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ABSTRACT 

Resource  Management  is  an  important  aspect  of 
management  in  today's  construction  projects.  Companies 
now  have  to  consider  the  impact  of  available  resources 
not  only  for  individual  projects,  but  for  multiple 
projects  considered  together  as  well.  This  report 
reviews  the  various  methods  currently  available  in  the 
industry  for  the  managing  and  leveling  of  resources. 
These  methods  include  both  manual  and  computer  assisted 
solutions.  Each  method  is  evaluated  with  respect  to 
its  capability  to  assist  the  construction  firm  in 
managing  single  and  multiple  projects.  In  addition, 
this  paper  makes  recommendations  on  the  types  of 
computer  programs  which  would  be  most  advantageous  to  a 
given  type  of  user. 
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CHAPTER  1 
OVERVIEW 


1.1   Introduction 


Management  of  resources  should  be  of  primary  interest 
to  a  construction  firm  that  wants  to  be  profitable,  but 
many  firms  do  not  bother  to  actively  manage  or  control 
resources  until  a  resource  crisis  is  upon  them.  Resource 
management  is  important  for  any  given  project  or  contract, 
but  the  need  is  even  greater  when  a  construction  firm  is 
working  on  several  construction  projects  concurrently. 

In  the  construction  industry,  the  relationship  between 
resource  management  and  a  logic  network,  such  as  CPM,  is 
that  of  a  partnership.  Essentially  all  logical  methods  of 
resource  management  are  based  upon  the  use  of  a  network 
output  which  provides  optimal  starting  and  finishing  dates 
for  each  activity  or  phase  of  work.  Resources  can  be 
attributed  to  each  scheduled  activity,  and  from  the 
resulting  related  information  the  resource  requirements  can 
be  determined. 
1 . 2   Resource  Definition 

A  resource  is  anything  which  is  necessary  or  desirable 
for  the  completion  of  a  construction  project.  As  you  can 
see  this  is  a  very  broad  definition  and  it  includes 
thousands  of  items.  However,  relatively  few  resources  are 
relevant  for  any  given  project  or  construction  firm.  The 
number  of  resources  which  are  relevant  to  a  firm  may  range 
from   as   little   as   one   to  as  many  as  several  hundreds  or 
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thousands   depending   on   the   size  of  the  firm  and  the  size 
and  complexity  of  the  project. 

Although  there  are  thousands  of  resources  which 
construction  firms  may  want  to  control,  nearly  all  will 
fall  into  one  of  six  general  categories.  These  general 
categories  are: 

1.  Money,  e.g.  cash  flow  restrictions. 

2.  Time,  e.g.  contract  time,  seasonal  weather 
restrictions . 

3.  Material,  e.g.  brick,  concrete,  form  lumber. 

4.  Manpower,  e.g.  masons,  carpenters,  steel  workers. 

5.  Equipment,  e.g.  trucks,  mortar  mixers,  cranes. 

6.  Subcontractors,  e.g.  electrical  subcontractors 
1 . 3   Time  and  Money  Management 

Money,  it  has  been  argued,  is  the  only  resource  which 
must  be  managed,  since  all  other  resources  can  be  reduced 
to  dollar  and  cent  values.  For  instance,  to  most 
contractors  time  is  of  interest  because  of  its  effect  on 
overhead  costs  and  any  penalties  or  bonuses  related  to  the 
completion  time.  Therefore,  they  argue  that  time  is  only 
controlled  due  to  its  relation  with  money.  If  the  effect 
of  time  was  not  related  to  money  in  an,y  way  then  there 
would  be  no  need  to  control  time. 

In  a  similar  way,  manpower,  material,  and  equipment 
can  be  converted  to  a  cost.  The  argument  is  "If  you  have 
enough  money  you  can  buy  anything."  If  you  need  more 
carpenters  and  there  is  a  carpenter  shortage  in  the  state, 
you   can,  for  a  given  cost,  relocate  carpenters  from  another 


state  or  train  more.  Although  the  cost  is  normally 
prohibitive,  the  option  is  available  if  circumstances 
justify  the  expense.  This  process  was  in  fact  utilized  in 
the  case  of  the  Alaskan  Oil  Pipeline.  The  bottom  line  of 
the  argument  is  that  the  only  resource  which  must  be 
managed  is  money,  since  all  other  resources  can  be  acquired 
for  a  cost  and  that  cost  is  ultimately  the  deciding  factor 
on  which  a  decision  is  based. 

Although  the  above  argument  is  valid  to  an  extent,  I 
believe  that  it  is  impractical  in  most  projects  to 
effectively  analyze  a  project  or  group  of  projects  with 
only  the  dollar  costs  involved.  The  complexity  of  trying 
to  reduce  all  relative  resources  to  dollar  values  and  then 
analyzing  all  of  the  thousand  of  options  available  would  be 
overwhelming.  Although  the  reason  for  managing  resources 
other  than  money  is,  in  fact,  to  save  money,  most 
construction  firms  have  made  simplifying  assumptions  to 
facilitate  their  analysis.  For  instance  many  firms  will 
not  consider  hiring  outside  labor  or  renting  equipment  when 
owned  equipment  is  available  even  if  renting  is  more  cost 
effective.  It  is  often  company  policy,  then,  which  sets  up 
the  general  guidelines  which  control  the  resources 
available  and  not  purely  the  dollar  value  they  may 
represent . 


Time  management  is  accomplished  through  various 
methods,  but  the  most  common  in  the  construction  industry 
are  the  Bar  Chart,  Arrow  Diagrams,  and  Precedence 
Diagrams.  There  are  some  more  elaborate  and  specialized 
methods  which  are  occasionally  used  such  as  the  Line  of 
Balance  Method,  and  probabilistic  methods  like  PERT  and  the 
Monte  Carlo  Method. 

Time  is  managed  by  producing  and  following  a  planned 
schedule.  The  primary  reason  this  is  done  is  to  increase 
profits,  although  there  are  other  reasons  such  as 
maintaining  a  company's  pride  or  reputation.  However,  a 
drive  to  maintain  a  good  reputation  for  finishing  projects 
on  time  may  in  some  cases  be  driven  by  a  fear  that  a  poor 
reputation  may  lead  to  a  loss  of  future  revenues. 

Since  money  and  time  are  resources  which  require 
unique  and  different  types  of  controls,  the  rest  of  this 
paper  will  focus  on  the  resources  of  material,  manpower, 
and  equipment.  The  term  'resources'  will  hereafter  refer 
only  to  these  three  unless  otherwise  specified. 
1 . 4   Management  Methods 

There  are  two  basic  ways  for  a  construction  firm  to 
manage  its  resources.  The  first  is  to  merely  identify 
resources  needed  based  upon  the  predetermined  early  start 
and  finish  dates  for  each  activity  and  plan  for  the 
availability  of  resources  accordingly.  By  doing  this  most 
resource    shortfalls   or   conflicts   are   anticipated,   and 
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management  is  prepared  to  correct  or  modify  the  situation 
before  any  serious  disruption  of  operations  can  occur.  The 
second  way  is  to  manipulate  the  start  and  finish  dates  of 
the  project  activities  to  reduce  the  requirements  of  a 
given  resource  on  any  given  day. 

The  difference  between  the  two  methods  can  be  shown  by 
an  example.  A  project  has  a  requirement  for  10  carpenters 
on  a  given  day  but  the  company  has  only  eight  carpenters  on 
the  company  payroll.  The  solution  using  the  first  method 
is  to  go  to  the  Carpenters  Union  Hall  or  the  local  non- 
union equivalent  and  arrange  for  two  additional  carpenters 
to  show  up  for  work  when  they  are  needed.  The  second 
approach  would  be  to  note  if  the  work  being  done  on  this 
given  day  for  carpenters  is  comprised  of  more  than  one 
activity.  If  so,  one  or  both  activities  could  be  moved 
within  their  respective  float  times  to  reduce  the  overall 
daily  manpower  requirements,  or  if  time  and  money  permits, 
the  project  could  be  delayed  by  the  required  number  of  days 
to  eliminate  the  need  to  hire  additional  personnel.  If, 
however,  the  activity  times  can  not  be  modified  due  to  cost 
or  other  constraints,  then  the  options  described  for  the 
first  management  approach  would  be  undertaken. 

Generally  most  firms  actively  controlling  resources 
will  use  a  combination  of  these  methods.  They  will  move 
resources  to  the  greatest  extent  practical  within  their 
float   times,   and   further   conflicts  will  be  reconciled  by 
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recognizing   the   conflict   and   arranging  for  a  solution  in 
advance   by   renting   extra   equipment   or  hiring  additional 
workers  for  the  time  period  in  question. 
1 . 5   Scheduling  Requirements 

The  managing  of  resources  and  the  use  of  a  logical 
scheduling  method  are  inseparable.  It  is  obvious  that  the 
resource  requirements  need  to  be  presented  in  relation  to  a 
time  period  such  as  days,  weeks,  or  months.  The  manager 
needs  to  know  what  his  resource  requirements  are  on  any 
given  day  or  group  of  days.  There  is  really  only  one  way 
this  listing  of  daily  resource  requirements  could  be 
derived.  That  method  is  to  develop  a  schedule  covering,  as 
a  minimum,  all  work  which  requires  the  use  of  managed 
resources.  Once  a  schedule  is  developed,  the  resource 
requirements  for  each  activity  or  operation  can  then  be 
applied  to  the  schedule.  Each  activity  or  portion  of  an 
activity  will  have  applied  to  it  the  resources  it  consumes. 
From  this  base  information,  the  project  or  groups  of 
projects  can  have  their  resource  requirements  identified 
and  ultimately  managed  for  any  given  period  of  time  by 
using  one  or  more  of  the  methods  described  in  this  paper. 
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CHAPTER  2 
SCHEDULING  METHODS 

2.1   Critical  Path  Method  (CPM)  Definitions  and 
Descriptions 

Critical  path  networks  are  logical  scheduling  systems 
which  produce  a  listing  of  start  and  finish  dates  for  each 
activity  identified. 

An  activity  (or  operation)  is  any  portion  of  a  project 
which  consumes  time,  money,  physical  action,  thought 
process,  and/or  any  identified  resource,  and  which  has 
definable  beginning  and  ending  points. 

The  results  obtained  from  a  CPM  analysis  are  early  and 
late  start  dates,  and  early  and  late  finish  dates.  The 
manager  is  also  informed  of  the  critical  path.  An  early 
start  date  is  the  earliest  time  (or  date)  which  a  given 
activity  may  begin.  This  time  is  based  upon  any 
restrictions  imposed  as  described  below.  The  early  finish 
date  is  the  earliest  time  which  a  given  activity  can  be 
finished  based  upon  the  early  start  date  and  its  duration 
(i.e.  vihe  time  needed  to  accomplish  the  activity).  Late 
start  and  finish  dates  are  similar  to  the  early  dates 
except  that  they  are  based  upon  the  latest  dates  which  work 
can  be  accomplished  without  extending  the  overall  project 
completion  time  as  determined  by  the  aggregate  effect  of 
all  the  project  activities  and  their  respective 
restrictions . 


The  critical  path  is  a  sequence  of  activities  which 
have  the  same  date  for  both  early  start  and  late  start. 
Each  activity  in  that  sequence  is  called  a  critical 
activity.  The  significance  of  the  critical  path  is  that 
any  delay  associated  with  a  critical  activity  will  result 
in  an  extension  of  the  scheduled  project  completion  date. 
2 . 2   Activity  Restrictions 

Restrictions  may  be  imposed  on  an  activity  as  a  result 
of  the  characteristics  of  the  activity  itself,  because  of 
contract  requirements,  or  because  of  company  policies  or 
requirements.  Whatever  the  origin  of  the  restriction,  it 
will  be  one  of  two  types.  The  first  type  of  restriction 
generally  applies  to  the  relationship  between  activities 
within  a  given  project.  These  are  the  "prerequisite 
condition"  restrictions.  The  second  type  of  condition  is 
the  resource  restriction. 

Prerequisite  condition  restrictions  are  based  upon 
building  trade  practices  and  logical  sequences  of  work.  If 
one  activity  may  not  start  until  one  or  more  other 
activities  have  been  completed,  then  a  prerequisite 
condition  restriction  exists.  As  an  example,  consider  that 
concrete  placement  for  a  wall  may  not  start  until  the 
formwork  is  complete  and  reinforcement  steel  is  in  place. 
The  prerequisite  condition  for  placement  of  concrete  is 
completed  formwork  and  reinforcement  steel.  Performing  the 
work   in  any   other   order   and   obtaining   the  desired  end 
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product  would  be  functionally  impossible.  While 
prerequisite  conditions  are  predominantly  due  to 
constructability  requirements,  they  may  be  due  to 
contractual  requirements  as  well.  An  example  of  this  may 
be  illustrated  by  considering  an  asphalt  resurfacing 
contract.  Suppose  the  owner  has  required  in  the  contract 
that  the  parking  lot  is  to  be  paved  in  sections  such  that 
at  least  three  quarters  of  the  lot  is  available  for  use  at 
all  times.  Although  there  is  no  constructability 
requirement  that  prevents  the  lot  from  being  resurfaced  as 
a  whole,  there  is  clearly  a  contractual  requirement  that  it 
be  done  in  quarters. 

A  resource  restriction  represents  a  condition  where 
the  resources  available  are  limited  or  restricted.  This 
condition  may  exist  in  a  number  of  ways  but  the  most  common 
are  in  relation  to  manpower  and  equipment.  For  example,  if 
a  general  contractor  needs  ten  carpenters  to  build  formwork 
for  foundations  in  one  area  of  a  project  and  ten  more 
carpenters  to  frame  out  the  building  in  another  area  of  the 
project,  but  he  only  has  ten  carpenters  on  the  payroll,  he 
can  obviously  not  have  them  working  in  two  places  at  the 
same  time.  Similarly,  a  company  which  owns  only  one  crane 
may  at  some  point  need  it  for  two  different  jobs  either  on 
the  same  or  different  projects  at  the  same  time.  In  both 
of  these  cases  it  is  the  actual  resource  that  is  limited. 
The   other  type  of  resource  restriction  occurs  when  there  is 
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a  physical  limit  to  the  amount  of  equipment  or  number  of 
workers  which  can  work  in  a  given  area.  An  example  of  this 
is  the  finishing  of  a  room.  It  may  be  impractical  for  one 
crew  of  workers  to  put  in  a  ceiling,  while  another  places 
the  floor,  and  while  still  another  paints  the  walls  even 
though  there  are  no  prerequisite  condition  restrictions 
which  would  prevent  doing  the  jobs  concurrently.  In  a 
large  auditorium  this  would  not  be  a  problem  but  imagine 
the  difficulty  if  it  was  a  hotel  bathroom.  This  could  be 
termed  a  constraint  on  the  resource  of  space. 
2 . 3   Unlimited  Resources 

The  critical  path  methods  assiime  an  unlimited  supply 
of  resources,  i.e.  the  only  restrictions  considered  are  the 
prerequisite  conditions.  This  is  done  for  several 
reasons.  One  reason  is  the  belief  that  anything  can  be 
done  for  a  price,  meaning,  if  you  pay  enough  you  can 
overcome  any  resource  shortfalls.  A  second  reason  is 
simplicity.  The  listing  of  prerequisite  conditions  is 
relatively  easy  compared  to  the  difficulty  of  listing  all 
of  the  resource  constraints  prior  to  the  scheduling  of  a 
project  or  group  of  projects.  And  a  third  reason  is 
flexibility.  This  actually  relates  to  the  first  two 
reasons  in  that  the  scheduler  is  given  the  flexibility  to 
decide  if  it  will  be  cheaper  for  the  company  to  hire 
additional  workers  and  rent  additional  equipment  or  if  it 
is   better   to   delay  the  project  a  given  number  of  days  and 
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incur  the  additional  overhead  costs.  In  addition,  in  the 
case  mentioned  above  concerning  the  room  finishing,  it 
would  be  placing  excessive  conditions  on  the  project  to  say 
that  the  ceiling  workers  must  follow  the  floor  workers  or 
vice  versa.  It  would  be  more  reasonable  to  schedule  the 
two  as  if  they  could  both  start  on  the  same  day  but  make  a 
note  on  the  output  to  indicate  that  they  may  not  occur 
simultaneously.  The  field  supervisors  can  then  decide 
which  sequence  is  better  based  upon  current  information  and 
conditions . 

CPM  networks  identify  the  specific  critical  activities 
which  are  expected  to  control  the  minimum  practical  project 
completion  time.  As  mentioned  earlier,  the  most  common 
methods  are  Arrow  Diagraming,  Precedence  Diagraming, 
Program  Evaluation  and  Review  Technique  (PERT) ,  and  the 
Monte  Carlo  Method.  Each  of  these  methods  has  its 
advantages  and  disadvantages,  but  the  use  of  one  of  these 
methods  is  generally  recognized  as  essential  for  effective 
resource  management  in  a  sizeable  construction  project. 
Some  background  on  the  various  CPM  methods  is  necessary  to 
understand  the  further  application  of  resources  to  the 
system. 

The   basic   information  or  actions  which  are  necessary 
for   evaluating   each   of   the   CPM  methods  mentioned  above 
includes : 
1.   Breaking  each  project  into  logical  activities. 
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2.  Identifying  the  expected  duration  for  each  activity. 
The  duration  may  be  in  any  standard  measure  of  time  e.g. 
calendar  days,  work  days,  months,  etc. 

3.  Identify  any  dependent  (prerequisite  condition) 
relations  between  the  activities.  This  is  done  by 
specifying  which  activities  must  be  complete,  or  in  a 
certain  phase  of  completion,  before  the  identified  activity 
can  begin. 

4.  Identify  all  resources  of  concern  to  the  manager  which 
are  required  for  that  activity,  if  any. 

After  these  four  actions  have  been  accomplished,  the 
information  for  either  an  arrow  diagram  or  precedence 
diagram  is  complete,  but  the  PERT  and  Monte  Carlo  methods 
need  to  have  additional  information.  PERT  and  Monte  Carlo 
are  statistical  methods  which  consider  probabilities  in 
determining  the  duration  of  the  activity.  In  addition  to 
the  expected  duration,  Monte  Carlo  and  PERT  require  the 
determination  of  an  optimistic  and  a  pessimistic  duration. 
Regardless  of  which  method  is  used,  the  result  of  the 
analysis  is  the  determination  of  an  early  start,  early 
finish,  late  start,  and  late  finish  date  for  each  activity 
identified.  These  results  can  be  graphed  in  a  bar  chart. 
In  this  form  the  manager  has  an  easily  read  graphical 
representation  of  when  each  activity  is  to  be  accomplished 
along  an  identified  time  line. 
2 . 4   Line  of  Balance  Method 

A  second  general  type  of  scheduling  is  called  the  Line 
of  Balance  Method  (LOB).  This  scheduling  technique  is  best 
suited  for  linear  or  repetitive  construction. 
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The  LOB  is  broken  down  into  definable  units  called 
operations  (or  activities).  Operations,  unlike  activities, 
are  defined  by  work  rates  vice  durations.  However  the  end 
result  is  much  the  same.  The  graphed  result  of  the  LOB 
scheduling  method  shows  an  operation's  start  and  finish 
dates  and  its  relation  with  the  rest  of  the  project  or 
other  projects. 
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CHAPTER  3 
RESOURCE  IDENTIFICATION  AND  ALLOCATION 

3 . 1   Resource  Identification 

One   of   the  first  steps  which  needs  to  be  taken  before 

the   project   is   scheduled   is   the   determination  of  which 

resources   are   of   concern  to  the  construction  firm.   It  is 

obviously   frivolous   to   track  how  many  hammers  will  be 

needed   for   a   certain  activity,   especially   if   all   the 

carpenters   are   required   to  provide  their  own  tools.   What 

needs    to   be   tracked,   however,   are   resources   such   as 

carpenters,    laborers,    steelworkers ,   forklifts,   cranes, 

bulldozers,   scrapers,  etc.   The  more  expensive  the  resource 

is   to   the   company   the  more   important   it  is  that  it  be 

managed   effectively.    Care   should   be   taken  not   to   be 

trifling  and  consider  insignificant  resources,  or  to  become 

careless   and  not  consider  some  very  expensive  or  critically 

short   resources.    The  list  of  items  which  are  necessary  to 

incorporate   into   the   resource   management  system  can  also 

change  with   time.     Consider  the  examples  given  by  Edward 

M.  Willis  in  Scheduling  Construction  Projects: 

In  the  spring  of  1983,  there  was  a  shortage 
of  gypsum  wallboard  throughout  the  South 
Atlantic  region,  even  though  plentiful 
supplies  were  available  in  other  regions  of 
the  country.  In  this  instance,  suppliers 
rationed  the  amount  of  wallboard  they  would 
deliver  to  individual  customers  until 
additional  supplies  could  be  brought  in  from 
other  regions.  A  more  serious  resource 
shortage  occurred  in  1973,  when  there  was 
worldwide  shortage  of  copper  electrical 
wire.    The   supply   of  basic  copper  had  been 
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affected  by  the  global  energy  crisis  that 
was  precipitated  by  the  Arab  oil  embargo. 
Some  manufacturers  of  copper  wire  gave 
priority  for  delivery  to  customers  who  could 
provide  basic  copper  or  scrap  copper. 

3 . 2   Activity  Identification 

When   scheduling   by   CPM  networks   the  scheduler  must 

consider   how   to  divide   the  project   into  a   list   of 

activities.    The   first   step   is   to   break   the  work  into 

logical   cohesive   units   with   respect   to  the  construction 

process:    first  build  the  foundation,  then  build  the  walls, 

and   then   complete  the  project  by  building  a  roof.   Each  of 

the   above   three   activities   can  again   be   broken   into 

numerous    smaller   activities.     With    respect    to   the 

foundation,    it   must   first   be   excavated,   followed  by 

formwork,   reinforcing  steel,  and  concrete  placement.   These 

activities   can  be   broken  down  a  third  time  into  even  more 

specific   operations.   Excavating   the   foundation  can  be 

further   refined   to  machine  excavate,  then  do  the  fine  edge 

work   by  hand,  followed  by  compacting  the  excavation  bottom, 

and   finishing  with   testing  for  compaction.   The  scheduler 

can   either   make  a  few  broadly  defined  activities  or  he  can 

be   very   detailed   and   specify   numerous  activities.   When 

determining  how  definite  to  make  the  activities  the  primary 

question   the  scheduler  must  be  asking  himself  is,  "Who  is 

going  to  use  this  schedule  and  for  what  purpose?" 
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If  a  schedule  is  being  developed  for  upper  management 
to  track  the  progress  of  the  project,  a  relatively  broad 
approach  may  be  used.  However,  if  this  schedule  is  going 
to  be  used  in  the  field  to  control  the  primary  project 
resources  of  manpower  and  equipment  then  a  more  refined 
approach  must  be  taken.  In  effect,  the  activities  must  be 
refined  and  narrowed,  until  the  basic  resources  identified 
above  become  elemental  to  each  activity.  To  clarify  what 
is  meant  consider  the  example  above  concerning  the 
foundation  construction.  This  activity  consumes  numerous 
man-hours  of  different  trades  and  different  types  of 
equipment.  If  the  scheduler  had  considered  this  a  single 
activity  and  attempted  to  allocate  all  the  resources 
required  by  this  activity,  he  would  need  to  include 
laborers  and  a  backhoe  to  excavate,  carpenters  to  build 
formwork,  steel  workers  to  place  the  steel,  and  concrete 
pumps,  power  trowels,  and  concrete  finishers  to  place  the 
concrete.  If  this  is  a  project  of  any  appreciable  size  the 
time  consumed  to  accomplish  all  of  the  described  work  would 
be  considerable,  with  all  of  the  above  resources  being 
allocated  to  the  activity  for  the  entire  duration.  This 
would  obviously  be  a  gross  inaccuracy.  The  answer  is  easy 
to  see  in  this  case.  The  scheduler  must  break  his  activity 
of  foundation  construction  into  the  more  specific 
activities  described  above. 
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Whether  or  not  there  needs  to  be  further  refinement  of 
the  activities  by  the  scheduler  is  based  upon  his  best 
judgement.  There  are  practical  limits  to  the  refinement 
which  is  sought  due  to  the  effort  to  keep  the  schedule  from 
becoming  unnecessarily  cumbersome.  He  should  consider  the 
suitability  of  the  activities  based  upon  how  well  they 
reflect  the  actual  resource  consumption  as  weighed  against 
trivial  gains  in  accuracy  and  adding  unnecessarily  to  the 
complexity  of  the  schedule. 
3 . 3   Distribution  of  Resources  Over  an  Activity's  Duration 

A  general  assumption  made  when  allocating  resources  to 
an  activity  is  that  the  resource  utilization  or  consumption 
rate  is  '  constant  throughout  the  duration  of  the  activity. 
This  assumption  is  made  due  to  its  mathematical  simplicity 
rather  than  any  reflection  of  reality.  In  actual 
situations  resource  utilization  is  seldom  uniform.  The 
most  common  case  would  probably  show  an  increase  from  a 
lesser  level  until  the  optimal  rate  assumed  is  attained. 
As  the  end  of  the  activity  draws  near  the  tendency  will  be 
to  decrease  resource  requirements  over  a  period  of  time 
until  the  activity  is  ended.  The  actual  variance  of 
resource  utilization  rates  within  an  activity  is  almost 
endless.  A  few  of  the  many  possibilities  are  shown  on 
Figure  1  in  Appendix  A. 
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Although  the  actual  variations  from  the  constant  rate 
assumption  can  be  seen  and  even  measured  in  the  field,  it 
is  not  practical  to  attempt  applying  this  to  a  schedule. 
The  problem  is  that  most  resource  rates  for  activities  can 
not  be  accurately  described  in  advance  of  execution,  nor 
would  a  variable  rate  be  suitable  for  easy  analysis. 
3 .4   Modification  of  Constant  Resource  Rate  Utilization 

If  the  project  activities  have  significant  and 
predictable  variations  there  is  an  option  available.  The 
scheduler  may  subdivide  the  activity  in  question  into  two 
or  more  linear  activities.  An  example  of  this  can  be  shown 
in  the  case  where  a  suspended  ceiling  is  going  to  be  put  in 
a  large  meeting  hall.  The  scheduler  has  the  choice  of 
defining  an  activity  "install  all  ceiling  tile,"  or 
dividing  this  activity  into  two  smaller  activities.  The 
first  would  be  "place  all  full  size  ceiling  tiles,"  and  the 
second  would  be  "cut  and  place  partial  tiles."  If  the 
number  of  workers  and  the  number  of  tiles  consumed  daily 
are  relatively  constant,  the  one  activity  would  probably 
suffice.  However,  if  the  work  normally  progresses  with  a 
full  crew  of  workers  placing  the  whole  pieces  followed  by  a 
partial  crew  specially  trained  to  cut  and  fit  the  edges, 
then  it  would  be  more  beneficial  to  schedule  using  the  two 
activities  described  above  and  to  allocate  the  resources 
accordingly.  Although  this  is  a  rather  simplistic  example, 
the   principle   can   be   carried   to   cases   where  resources 
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increase  and/or  decrease  at  predicted  rates.  Under  these 
conditions  the  scheduler  can  link  the  activities  linearly 
and  step  the  resource  requirements  of  each  as  appropriate 
to  get  an  approximate  representation  of  the  actual 
conditions  which  will  be  encountered.  Again,  caution 
should  be  used  not  to  overdo  the  addition  of  activities. 
Needless  breakdown  of  the  project  will  only  lead  to 
confusion  and  excessive  control  where  it  produces  no 
beneficial  effect. 
3 . 5   Activity  Start  Date  Determination 

Producing  an  adequate  schedule  and  a  plan  on  how  to 
execute  that  schedule  is  imperative  if  the  contractor  is 
going  to  attain  his  desired  profit.  If  a  well  thought  out 
plan  is  produced,  updated,  and  carried  out,  both  the 
contractor  and  owner  can  realize  a  cost  savings. 

The  contractor  has  several  different  ways  to  develop 
his  schedule.  The  first  and  most  basic  is  to  begin  all 
work  associated  with  each  activity  at  the  early  start 
date.  There  are  however  some  advantages  and  disadvantages 
of  always  starting  work  on  the  early  start  date.  The 
primary  advantage  is  that  the  likelihood  of  a  minor  delay 
in  any  non-critical  activity  would  not  adversely  affect  the 
project  duration  or  resulting  overhead  costs.  The 
disadvantage  is  primarily  based  upon  the  parallel  nature  of 
many  early  start  dates.  By  this  I  mean  that  all  activities 
which   are   dependent   upon   the  same  activity  will  have  the 
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same  early  start.  The  result  is  numerous  activities  may  be 
scheduled  to  start  simultaneously  at  their  early  start 
dates.  The  concurrent  starting  of  these  activities  could 
result  in  the  competition  for  resources  or  the  inefficient 
use  of  resources.  An  example  can  show  the  difficulty 
involved.  Suppose  a  one  room  addition  is  being  made  to  an 
existing  office  building.  A  schedule  may  have  many 
activities  dependent  upon  the  covering  of  the  building  with 
a  water  tight  roof.  Assume  that  the  plastering  of  the 
walls,  the  ceiling  installation,  the  placement  of  floor 
tile,  and  finish  carpentry  work  can  all  begin  upon 
completion  of  the  roof  work.  If  the  contractor  plans  to  do 
all  of  this  work  with  in  house  employees,  he  will  most 
likely  not  have  enough  workers  to  execute  all  of  the  tasks 
simultaneously.  Even  if  he  has  enough  workers,  the 
situation  is  analogues  to  the  situation  of  finishing  a  room 
described  previously.  It  might  be  physically  impossible 
due  to  space  limitations  to  do  all  these  activities  at  the 
same  time.  In  the  first  case  hiring  more  employees  would 
solve  the  problem,  but  a  solution  to  both  would  be  to 
stagger  the  start  dates  of  the  activities  rather  than 
consistently  using  the  early  start  dates. 

For  most  contractors,  staggering  or  delaying  the  start 
of  some  non-critical,  parallel  activities  is  far  more 
palatable  than  hiring  additional  workers  who  will  only  be 
needed   for   a   short   time   and  whose   level   of   skill  is 
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unknown.  For  contractors  who  are  working  on  more  than  one 
contract  at  a  time,  the  additional  problem  of  scheduling 
work  with  the  related  resource  constraints  is  further 
complicated.  The  contractor  in  this  case  needs  to  further 
analyze  not  only  the  project  being  scheduled  but  also  what 
affect  that  schedule  may  have  on  any  ongoing  projects. 

All  this  demonstrates  that  a  plan  of  always  using 
early  start  dates,  or  always  using  any  specific  dates 
whether  early  or  late,  is  generally  not  practical  and 
therefore  not  advisable.  Each  project  must  be  scheduled 
based  upon  facts  and  educated  judgement  of  the  people 
involved,  who  consider  the  resource  requirements  within 
that  project,  plus  the  resource  requirement  of  all  the 
current  projects  under  the  company's  control.  This  means 
not  only  scheduling  the  new  project  but  possibly 
rescheduling  all  of  the  current  or  ongoing  projects. 
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CHAPTER  4 
MANUAL  RESOURCE  LEVELING  METHODS 

4 . 1   Introduction 

Resource   leveling   Is   the   process   described  earlier 

whereby   schedules   are   modified   to   optimize   the   use  of 

resources   using   float  times  of  an  activity  or  occasionally 

by  using  a  flexible  contract  completion  time.   From  this  we 

can   define   the   two  ways   to   approach  resource  leveling. 

These   methods,   as   referred   to   by  Robert  B.  Harris,  are 

"Unlimited    Resource    Leveling"    and    "Limited   Resource 

2 
Allocation. " 

The  unlimited  resource  leveling  approach  has  the  goal 
of  reducing  the  resource  requirements  to  the  greatest 
extent  possible  without  increasing  the  scheduled  project 
time  as  determined  by  the  critical  path.  This  approach 
places  the  higher  priority  on  reduction  of  project  overhead 
costs  and  less  on  the  possible  Increased  resource  costs. 
It  also  assumes  that  any  resulting  resource  requirements 
can  be  attained  for  a  reasonable  cost. 

The  limited  resource  allocation  approach  recognizes 
that  sometimes  it  is  more  advantageous  to  incur  the 
additional  cost  of  a  few  days  of  overhead,  liquidated 
damages,  and/or  penalties,  in  lieu  of  Incurring  the  cost 
of  training  new  employees,  or  renting  additional 
equipment.  This  approach  uses  a  defined  limit  on  the 
allowable  resource  demand  for  any  given  day  or  period  of 
time.  Based  upon  this  limit  and  its  affect  on  the 
CPM  network,   the   length   of   the   project   is  determined. 
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Therefore,   the  limit  on  projected  resource  requirements  has 
priority  over  minimizing  the  project  duration. 

Regardless   of  the  approach,  however,  the  ultimate  goal 
of   resource   leveling   is  to  reduce  peak  and  valley  demands 
for   resources.    There   are   two   methods   of  accomplishing 
this . 
4. 2   The  Traditional  Method 

Harris   uses   the   term  "Traditional  Leveling  Approach" 

to   describe   one  of  the  simplest  manual  systematic  leveling 

3 
methods.     This   method  will   review   each  project  day  and 

will   compare   the   daily   resource  requirements  against  the 

allowable    limit     (the   limited   resource   allocation 

approach) .     If    that    limit    is    exceeded,   a   set   of 

predetermined   steps   are   taken   to   reduce   the   resource 

requirement . 

4.2.1   Solution  Steps 

The  first  step  in  this  method  is  to  determine  the 
resource  requirements  for  each  activity  and  develop  a  CPM 
network  with  early  and  late  start  times,  early  and  late 
finish  times,  and  float  for  each  activity. 

At  this  point  the  resource  limits  must  be  compared  to 
each  individual  activity  requirement  to  insure  that  no 
single  activity  alone  exceeds  the  allowable  limit.  If  this 
does  occur  either  the  limit  must  be  modified,  the 
production  modified  to  reduce  the  daily  quantity  demanded, 
or   the  activity  in  question  must  be  broken  into  two  or  more 
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smaller   activities   which  have   their   individual  resource 
limits  within  the  acceptable  bounds. 

Once  all  of  the  appropriate  start  and  finish  dates 
have  been  determined,  the  results  must  be  graphed  on  a  bar 
chart.  The  method  for  accomplishing  this  should  be  to 
first  graph  all  of  the  critical  path  bars  allowing  at  least 
one  graph  block  width  for  each  time  duration  unit  used. 
This  is  generally  calendar  days,  work  days,  or  weeks.  For 
simplicity,  the  time  period  used  here  will  be  'days' 
although  any  time  period  would  be  acceptable  given  that  it 
is  used  consistently.  Following  the  graphing  of  the 
critical  activities,  graph  the  non-critical  activities  with 
respect  to  their  early  start  dates. 

Now  that  the  bar  chart  has  been  prepared,  the  resource 
rate  (the  resource  requirement  per  time  period  graphed)  of 
each  resource  in  question  is  applied  to  each  activity  bar. 
This  can  be  done  by  writing  the  rate  adjacent  to  the  bar  or 
by  having  a  legend  or  listing  available  for  reference.  If 
only  one  or  two  resources  are  being  evaluated  it  is  easier 
to  make  a  note  on  the  activity  bar  itself. 

The  next  step  is  to  sum  vertically  all  of  the  resource 
requirements  on  a  daily  basis.  The  daily  sums  are  then 
recorded  on  a  line  called   0. 

The  sum  line  of  0  is  now  analyzed  to  determine  if 
there  are  any  values  which  are  in  excess  of  the 
predetermined   limit.   If  not,  the  schedule  is  acceptable  as 
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It  stands  (with  respect  to  the  self  imposed  resource 
limits)  and  no  further  analysis  is  required.  If,  however, 
the  results  of  the  first  summation  show  values  above  the 
limit,  some  of  the  activities  will  need  to  have  their  start 
dates  delayed. 

The  approach  to  take  is  to  find  the  first  day  in  which 
the  resource  requirement  exceeds  the  allowable  value.  Move 
vertically  through  the  bar  chart  to  the  activity  or 
activities  contributing  to  that  particular  resource. 

Move  that  bar  to  the  right  (i.e.  delay  the  activity 
start  date)  one  day.  Enter  a  line  below  XO  with  a  notation 
showing  which  activity  was  moved,  which  direction  and  how 
many  days  it  was  moved.  The  notation  used  by  Harris  is 
"C-*-!",  which  indicates  activity  C  was  moved  to  the  right  1 
day. 

The  summation  needs  to  now  be  corrected  to  show  the 
new  situation.  To  do  this  add  and  subtract  as  appropriate 
from  the  2  0  line  the  resource  rate  of  the  activity  moved. 
Show  these  values  with  their  correct  signs  on  the  line 
noted  as  C-^1 . 

The  next  step  is  to  create  another  summation  line 
called  ^1.  This  line  will  show  the  summation  with  respect 
to  the  first  change  made  to  the  schedule.  If  this  new 
summation  line  shows  that  all  the  daily  resource 
requirements  are  met  then  the  process  is  complete,  if  not, 
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then   go   again   to   the   non-critical   activity  causing  the 
excessive  requirement  and  move  it  a  day. 

The  process  of  moving  activities  to  the  right  within 
their  float  and  then  re-summing  and  reevaluating  continues 
until  either  all  float  is  consumed  or  all  resources  have 
been  brought  under  the  required  limit.  At  this  point  if 
there  is  still  an  excess  of  resource  demand  on  any  given 
day,  the  answer  is  to  extend  the  project  duration  and  to 
move  a  critical  activity  a  day  at  a  time  until  the  resource 
requirements  are  within  acceptable  limits.  A  relatively 
simple  example  of  this  analysis  is  shown  in  Appendix  B, 
Figures  1  through  4 . 

4.2.2   Problems 

The  biggest  problems  with  this  method  are  that  it  does 
not  truly  level  the  work  to  the  greatest  extent  possible, 
it  tends  to  excessively  load  resources  at  the  end  of  the 
project,  and  it  is  very  cumbersome  to  work  with  for  any  but 
the  simplest  of  projects. 

The  problem  of  not  leveling  the  project  to  the 
greatest  extent  possible  can  be  alleviated  with  some 
additional  effort  following  the  reduction  of  all  daily 
requirements  below  the  limit.  What  needs  to  be  done  is  to 
review  the  resource  peaks  and  see  if  movement  of  the 
related  activities  within  their  respective  floats  would 
smooth  out  some  of  the  peaks  and  valleys.  This  would  be 
accomplished   in   a  similar  way  as  above  except  that  a  lower 
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resource  limit  would  be  used  for  that  limited  time  period. 
In  addition  the  critical  activities  would  probably  not  be 
considered  for  movement  since  the  original  resource  limit 
was  met  earlier  and  any  further  movement  of  critical 
activities  would  result  in  extending  the  project  completion 
times . 

The  second  problem  of  excessive  loading  of  resources 
at  the  end  of  a  project  can  occasionally  be  reduced  to  a 
small  degree  by  examining  whether  or  not  any  of  the 
previously  moved  activities  can  be  moved  back  to  the  left 
(i.e.  started  earlier)  without  exceeding  the  resource 
limits  previously  attained.  The  method  by  which  this  is 
done  is  primarily  trial  and  error,  however  the  scheduler 
should  be  able  to  visually  discount  many  options  and 
thereby  minimize  the  number  of  options  which  need  to  be 
checked. 

The  traditional  approach  becomes  complex  when  large 
projects  are  involved  or  more  than  one  resource  is 
involved.  This  complexity  stems  from  the  interdependence 
of  all  the  activities  and  the  possible  number  of 
activities.  When  activities  are  moved  within  their  free 
float  (days  an  activity  may  be  delayed  without  affecting 
any  other  activity)  there  is  relatively  little  difficulty. 
However  when  interfering  float  is  involved  i.e.  float  which 
delays  other  activities  but  not  the  project  time,  which  is 
the   more   common   occurrence,  the  interdependence  of  all  of 
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the  activity  bars  must  be  analyzed.  The  result  is  not  that 
just  one  activity  is  moved  one  day,  but  that  one  is 
intentionally  moved  and  another  fifteen  are  affected  and 
therefore  also  moved  back  one  day.  This  type  of 
manipulation  leaves  a  lot  of  room  for  error. 

The  number  of  resources  which  must  be  leveled  can  have 
a  great  affect  on  the  amount  of  work  necessary  to  level  the 
project.  If  two  resources  are  involved,  the  first  resource 
must  be  leveled  as  previously  described  and  then  the 
process  is  repeated  for  the  second  resource.  There  is  one 
major  problem  with  this  however:  moving  activities  for  the 
second  resource  may  increase  the  dally  resource 
requirements  for  the  first  resource  already  leveled. 
Therefore,  whenever  more  than  one  resource  is  involved  the 
result  may  be  a  cyclic  solution.  After  the  second  resource 
is  leveled  it  may  be  necessary  to  go  back  and  reschedule 
based  upon  the  first  resource  again,  and  so  on. 

There  is  an  alternative  to  this  cyclic  solution,  but 
the  resulting  schedule  is  not  as  good  and  the  additional 
work  is  only  partially  reduced.  Using  priorities,  each 
resource  should  be  ranked  based  upon  its  importance.  The 
first  resource  would  be  scheduled  as  if  it  were  the  only 
resource,  and  all  following  resources  would  be  scheduled 
with  an  effort  to  bring  their  rate  demands  below  the  set 
limit  without  adversely  affecting  any  previously  scheduled 
resources.    The  problem  here  comes  from  the  continual  cross 
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checking  between  resources  to  see  the  resulting  effect  of 
any  rescheduling.  In  addition,  scheduling  beyond  the  first 
one  or  two  resources  will  have  very  limited  effect  since 
most  activities  will  be  'locked  in'  resulting  in  very 
limited  flexibility. 

4.2.3  Applicability  to  Multi-Project  Management 
The  traditional  approach  can  be  modified  to  account 
for  multi-project  management.  This  can  be  accomplished  by 
stacking  the  projects  on  the  same  bar  chart.  The  first 
project  will  have  a  bar  chart  produced  which  is  identical 
to  the  single  project  example  explained  above.  The  second 
project  can  be  graphed  just  below  the  first  on  the  same 
sheet.  The  summation  line  will  then  be  listed  below  both 
projects  such  that  it  incorporates  both  projects.  The 
activities  of  either  or  both  projects  can  then  be  moved,  as 
they  were  in  single  project  situation,  to  reduce  the 
resource  requirements  below  the  limit. 

Care  must  be  taken  in  the  multi-project  case  to  relate 
the  two  or  more  projects  by  date.  In  the  single  project 
analysis  the  actual  start  and  stop  dates  were  irrelevant. 
Whether  day  one  was  on  January  1  or  on  June  10  the  analysis 
is  the  same  since  all  activities  are  related  to  the  initial 
start  date.  In  the  multi-project  case  there  is  no  such 
relation  between  projects.  To  represent  properly  the 
relationship  between  the  two  projects  they  must  be  applied 
to   the   same   time   line.    The  easiest  and  clearest  way  to 
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accomplish  this  is  to  apply  them  to  a  calendar  date 
listing,  vice  a  listing  of  project  duration  days  which  is 
sometimes  used  for  only  one  project.  An  alternative  method 
may  be  used  but,  in  most  cases  it  is  less  practical  than 
using  dates.  For  example,  it  is  possible  to  relate  all 
trailing  projects  to  the  first  project  by  indicating  the 
actual  number  of  days  by  which  each  trails:  i.e.,  project 
two  begins  on  day  ten  of  project  one.  This  requires  the 
planner  to  first  convert  all  known  project  dates  to  elapsed 
time  in  days  and  then,  upon  completion  of  the  leveling,  he 
will  again  have  to  convert  the  information  back  into 
calendar  dates.  Although  this  method  is  possible,  it  is 
more  confusing  and  less  representative  of  the  actual 
condition.  It  is  much  more  logical  to  work  with  the 
projects  using  their  relation  to  actual  calendar  start 
dates,  since  that  is  the  form  it  will  ultimately  take  in 
the  schedule. 

The  complexity  of  the  leveling  is  increased  greatly 
when  analyzing  multiple  projects.  By  introducing  more 
projects,  more  activities  are  involved  on  any  given  day. 
As  a  result,  the  level  of  difficulty  in  obtaining  a 
reasonable  solution  is  amplified.  However,  there  is  not 
the  additional  problem  of  dependencies  between  projects. 
Movement  of  an  activity  in  project  one  will  only  have 
effects  on  the  dependencies  and  logic  of  project  one,  not 
project   two.   The  only  likely  exception  to  this  would  be  if 
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the   two   projects   are   on  the  same  site  and  are  related  by 
being  part  of  some  larger  master  project. 
4 . 3   Minimum  Moment  Approach 

The  minimum  moment  approach  to  resource  leveling  is  a 
method  whereby  the  scheduled  duration  of  the  project  is 
maintained,  while  the  resource  histogram  is  optimized  to 
the  greatest  extent  possible.  This  is  done  by  reducing  the 
peaks  and  valleys  of  the  histogram  into  the  best  possible 
approximation  of  a  rectangle  which  activity  constraints 
will  permit. 

The   term  minimal  moment  approach  is  used  since  it  best 

describes   the   theorem   on  which  the  method  is  based.   The 

theorem  as  stated  by  Harris  is  as  follows. 

When  a  given  set  of  elements  is  arranged 
into  a  histogram  over  a  fixed  set  of  intervals, 
the  minimum  moment  of  the  elements  exists  when 
the  histogram  is  a  rectangle  over  the  fixed  set 
of  intervals. 

Before  discussing  this  method  further  it  is  best  to 
explain  some  terms.  The  first  is  "back  float".  Back  float 
is  the  amount  of  time  (usually  in  days)  which  an  activity 
may  be  started  earlier,  i.e.  the  difference  in  days  between 
the  scheduled  start  date  and  the  early  start  date. 

Harris  also  uses  the  term  "improvement  factor".  The 
improvement  factor  is  a  measure  of  whether  the  moment  of 
the  histogram  has  been  increased  or  decreased.  A  positive 
improvement  factor  indicates  a  decrease  in  the  moment. 
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This  method  follows  a  list  of  very  detailed  steps 
which  produces  an  optimized  resource  histogram  within  the 
constraints  of  project  time  and  activity  dependencies. 
This  optimized  value  may  or  may  not  fall  within  any  known 
resource  limits  anticipated,  and  the  resulting  histogram  in 
most  cases  will  not  look  rectangular.  The  result  will, 
however,  have  fewer  and  less  pronounced  peaks  and  valleys 
than  the  original  unleveled  histogram. 

4.3.1   Method  and  Procedures 

Only  an  overview  of  the  method  is  given  below.  A 
detailed  approach  on  how  to  solve  for  a  leveled  schedule 
using  this  method,  plus  an  example,  are  shown  in 
Appendix  C.  The  actual  process  which  occurs  when  following 
these  steps  is  as  follows. 

The  first  step  (after  all  basic  information  is 
determined)  is  to  start  with  the  activities  which  have  the 
latest  start  date,  and  determine  the  improvement  factors 
for  each  day  of  float  allowed.  The  activity  is  then  moved 
the  number  of  days  corresponding  to  the  highest  improvement 
factor.  If  the  highest  improvement  factor  is  negative,  no 
movement  takes  place.  A  positive  improvement  factor 
indicates  that  movement  of  the  activity  by  the  given  number 
of  days  decreases  the  histogram  moment,  thereby  leveling 
the  histogram.  A  zero  indicates  there  is  no  improvement, 
but  if  this  Is  the  highest  value  the  activity  is  moved 
anyway.     Although    there    is    no   direct   or   immediate 
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beneficial  effect  from  the  moving  of  that  activity,  it 
allows  greater  free  float  for  activities  which  occur 
earlier  in  the  project.  A  negative  improvement  factor 
indicates  that  the  moment  of  the  histogram  is  increased  and 
the  movement  of  an  activity  the  corresponding  number  of 
days  would  be  detrimental  to  the  leveling  effort. 

The  second  step  is  to  move  consecutively  earlier  with 
respect  to  the  early  start  dates  and  repeat  the  procedure 
used  in  the  first  step. 

When  all  activities  have  been  moved  forward  or  at 
least  tested  to  see  if  they  should  be  moved  forward,  a 
reverse  pass  begins.  This  is  the  last  step.  The 
improvement  factors  are  again  calculated,  but  this  time  the 
first  activity  to  be  checked  is  that  with  the  earliest 
start  date.  The  decision  on  whether  or  not  to  move  the 
activity  is  based  upon  the  same  rationale  used  earlier, 
only  the  number  of  days  which  must  be  checked  for  each 
activity  is  not  its  free  float,  but  its  back  float.  The 
activity  is  then  moved  earlier  in  the  schedule  as 
improvement  factors  indicate. 

The  reason  the  reverse  pass  is  used  is  primarily  to 
prevent  the  problem  of  loading  the  resources  at  the  end  of 
the  project.  The  reverse  pass  moves,  to  the  greatest 
extent  possible,  all  activities  forward  (i.e.,  earlier) 
which  have  no  detrimental  effect  on  the  moment. 
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4.3.2   Problems 

The  biggest  single  problem  with  this  method  is  it's 
complexity.  To  learn  the  method  such  that  a  simple  ten 
activity  project  can  be  solved  may  take  several  days.  In 
addition  there  are  so  many  confusing  manipulations  of 
numbers  on  the  matrices  that  the  chances  for  a  mathematical 
error  are  also  very  large.  A  corresponding  problem  which 
stems  from  the  complexity  is  that  the  individual  doing  the 
scheduling  will  have  to  continually  use  the  method  to 
remain  proficient  at  it.  If  he  attempts  to  perform  the 
calculations  once  every  couple  of  weeks  he  is  going  to  find 
that  he  needs  to  review  and  relearn  the  specifics  of  the 
method. 

In  addition  to  the  above  the  time  required  to  solve  a 
problem  is  extraordinary,  again  because  of  the  complexity. 
To  solve  a  relatively  simple  problem  such  as  that  given  as 
an  example  in  Appendix  C,  may  take  up  to  two  or  three 
hours.  The  time  involved  and  the  chance  for  error  increase 
tremendously  if  the  number  of  activities  involved  increase 
moderately. 

The  final  problem  worth  noting  is  that  the  solution 
obtained  by  the  method  may  not  be  acceptable.  If  a 
constraint  on  the  number  of  resources  exists,  this  method 
is  not  equipped  to  systematically  extend  the  project  time 
to  produce  further  leveling  in  order  to  attain  that  known 
limit. 
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4.3.3  Applicability  to  Multi-Pro.ject  Planning 
This  method  is  not  suitable  for  multiple  project 
planning;  it  is  not  easily  adaptable  to  providing  for  the 
leveling  of  two  or  more  projects  which  occur 
simultaneously,  and  attempting  to  do  so  would  add 
overwhelmingly  to  the  already  complicated  system.  If  the 
approach  could  be  made  easier  to  use  by  the  common  planner 
in  the  industry,  the  method  would  have  some  merit.  The 
only  way  that  is  going  to  happen,  and  has  happened  to  a 
limited  degree,  is  with  computers. 


35 


CHAPTER  5 
COMPUTER  ASSISTED  RESOURCE  MANAGEMENT 

5 . 1  Overview 

Resource  management  through  the  use  of  resource 
leveling  methods  lends  itself  well  to  computer 
applications.  The  numerous  calculations  and  complicated 
interdependencies  are  best  handled  by  a  machine  which  is 
designed  specifically  for  that  task.  The  computer  and  the 
related  software  can  perform  this  function  quickly, 
effectively,  and  economically. 

There  are  numerous  commercial  and  some  public  domain 
products  on  the  market  which  can  assist  the  project  planner 
with  his  scheduling.  The  more  advanced  of  these  provide 
the  project  planner  the  ability  to  level  resources  for  a 
given  project,  but  only  the  most  sophisticated  provide  the 
means  to  level  resources  for  multiple  projects. 

5 . 2  Current  Use  in  the  Industry 

Although  the  micro-computer  is  now  readily  available 
to  nearly  any  business  for  a  reasonable  cost,  the 
construction  industry  has  been  slow  to  utilize  this  tool. 
At  this  time  the  number  of  project  planners  and  schedulers 
using  a  computer  based  system  is  minimal,  but  increasing. 
Most  are  still  using  manually  generated  bar  charts  and  many 
of  those  are  not  based  upon  a  network  such  as  CPM  or  PERT. 
When  this  is  compared  to  the  relative  ease,  speed, 
accuracy,    and    control   provided   by   computer   generated 
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networks  and  bar  charts,  the  lack  of  utilization  of  this 
resource  is  astounding. 

There  are  a  few  reasons  that  many  companies  do  not 
seem  to  use  computers  yet.  One  of  the  biggest  reasons 
seems  to  be  a  fear  of  or  lack  of  trust  in  the  machines. 
The  existing  generation  of  company  executives  who  did  not 
grow  up  with  computers  in  the  home  or  at  school  feel 
intimidated  by  the  computer.  They  feel  that  you  have  to 
be  young  to  learn  how  to  use  one.  As  a  result  they  do  not 
see  why  they  cannot  continue  to  get  along  with  the  methods 
they  have  used  for  the  last  thirty  years. 

Another  reason  computers  are  not  used  to  the  fullest 
extent  possible  is  the  learning  curve.  Many  owners  are 
hesitant  to  purchase  the  computer  hardware  and  software, 
not  because  of  the  direct  cost,  but  the  indirect  costs.  An 
IBM  XT  with  associated  hardware  and  one  of  the  better 
software  packages  would  cost  less  than  5000  dollars.  For 
most  companies  this  cost  is  trivial.  But,  the  time  and 
prospective  profit  lost  by  the  company's  schedulers  and 
planners  while  trying  to  learn  how  to  use  the  software,  can 
cost  a  company  much  more.  While  the  employees  are  learning 
the  system  they  do  not  have  as  much  time  to  devote  to  their 
ordinary  duties;  this  may  mean  hiring  additional  temporary 
personnel.  If  the  software  has  a  particularly  long 
learning  curve  the  indirect  and  Intangible  costs  may  be 
significant.     If,    however,   the   software   can   be   used 
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reliably  after  minimal  training  to  at  least  match  the 
existing  scheduling  efforts,  then  the  cost  of  the 
equipment  and  training  is  quickly  offset  by  the  benefits 
gained. 

The  last  major  concern  of  many  company  executives  is 
that  they  may  get  schedulers  and  planners  that  become 
indispensable.  In  other  words,  if  only  one  project  planner 
or  scheduler  learns  the  computer  system,  he  has  exceptional 
control  over  the  company  through  his  unique  knowledge.  The 
management  may  be  faced  with  a  choice  of  either  paying  the 
employee  an  exorbitant  salary  or  letting  him  go  and  trying 
to  retrain  a  new  person.  The  problem  with  training  a  new 
person  is  that  he  needs  to  be  proficient  with  the  system 
before  any  serious  damage  is  incurred  to  ongoing  projects 
due  to  lack  of  project  control . 
5 . 3   How  to  Find  the  Right  System 

There  are  several  items  which  should  be  considered 
when  deciding  what  computer  system  to  buy.  As  a  minimum 
the  following  traits  should  be  considered  for  each  option. 

1.  Training  necessary  to  utilize  the  system. 

2.  Applicability  to  your  company,  i.e.,  is  it  a  home 
builders  software  package  and  you  are  an  earth  moving 
company  or  is  it  too  sophisticated  or  too  basic  for 
your  applications. 

3.  Quality  of  output,  i.e.,  is  it  clear  and  concise. 

4.  The  total  system  cost  including  indirect  costs. 

5.  Efficiency  of  the  system,  i.e.,  is  the  system 
cost  effective  as  a  result  of  time  saved. 
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The   above   considerations   are   not   in  any  particular 
order   of   importance.    That  order  should  be  defined  by  the 
firm   considering   the   purchase  based  upon  their  particular 
needs  and  concerns . 
5 . 4   Benefits  of  Computer  System  Utilization 

According  to  Daniel  D.  Roman  there  are  seven  basic 
benefits  to  be  derived  from  using  a  computer  system  in 
project  management.  These  are  economy,  responsiveness, 
improved  management  visibility,  accuracy,  forced  planning, 
the  ability  to  manage  complexity,  and  reduced  clerical  work 
load. 

5.4.1   Economy 

It  is  usually  cheaper  for  the  planner  to  use  a 
computer.  In  the  past  the  only  feasible  way  to  use  a 
computer  was  to  have  a  central  system  used  on  numerous 
large  repetitive  operations  and  run  by  a  specialized  team 
of  persons.  Today,  however,  due  to  the  increased 
flexibility  and  power,  and  the  decrease  in  size  and  cost  of 
new  systems  the  computer  can  be  used  by  an  individual  on  a 
part  time  basis  and  still  be  economically  feasible. 

The  company  can  obtain  cost  savings  both  directly  and 
indirectly.  The  direct  savings  are  a  result  of  the 
employee  being  more  productive.  The  indirect  costs  can  be 
realized  through  the  better  management  of  the  firm's 
resources.     If    the    employee    does   a   better   job   at 
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controlling   costs   by  using   the   computer,  the  company  is 
going  to  reap  the  cost  benefits. 

5.4.2  Respons  i veness 

The  response  time  to  changes  or  updates  in  schedules 
or  resource  requirements  can  be  reduced  to  minutes  or  hours 
instead  of  days.  When  a  change  is  imminent  the  effect  of 
that  change  can  be  determined  within  minutes  when  a 
computer  is  used.  Direction  on  what  corrective  action  or 
preventative  action  must  be  taken  can  be  decided 
immediately,  and  the  resulting  information  can  then  be 
forwarded  to  all  persons  involved  thereby  reducing  costly 
delays. 

5.4.3  Improved  Management  Visibility. 

Project  managers  at  all  levels  throughout  the  firm 
also  receive  the  benefit  of  computer  generated  management 
information.  The  information  generated  by  the  computer 
software  is  generally  provided  in  a  clear  and  concise  way 
and  is  suitable  for  direct  incorporation  into  reports  for 
either  superiors  or  subordinates  on  demonstrating  current 
conditions,  progress,  or  control  on  any  given  group  of 
projects.  By  having  this  clear,  concise,  and  consistent 
information  available  the  project  managers  are  better  able 
to  do  their  jobs  of  managing  the  firm's  obligations. 
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5.4.4  Accuracy 

The  accuracy  of  the  computer  system  in  most  cases  is 
near  perfect,  provided  of  course  that  the  software  is 
without  error  and  the  raw  information  being  entered  is 
correct.  The  saying  that  'a  computer  can  do  more  work  in  a 
minute  than  a  man  can  do  in  a  lifetime,  but  it  can  also 
make  more  mistakes  in  one  second  than  a  man  can  in  a 
lifetime'  is  true,  but  with  commercial  computer  software 
and  hardware  on  the  market  today  most  of  the  error 
producing  problems  have  been  eliminated.  Many  software 
packages  are  'user  friendly',  meaning  that  the  software  can 
detect  incorrect  or  inaccurate  input  and  inform  the  user  of 
the  mistake.  This  has  resulted  in  the  elimination  of  many 
common  errors.  The  fact  remains,  however,  that  with 
current  systems,  the  final  output  is  much  more  likely  to  be 
correct  with  a  computer  than  a  solution  determined 
manually. 

5.4.5  Forced  Planning 

The  tendency  to  plan  where  there  was  no  planning 
before  exists  when  computers  are  used.  This  is  caused  by 
the  vast  amount  of  information  which  can  be  produced  by  the 
computer.  When  reports  and  schedules  can  be  prepared 
easily  and  quickly,  and  any  inconsistencies  or  errors  are 
pointed  out  by  the  computer  generated  report,  management  is 
driven  to  refine  their  planning  so  as  to  correct  any  weak 
areas   identified  by  the  system.   This  is  simply  a  result  of 
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management's   dislike   of   'loose   ends'  and  their  desire  to 
correct  problems  which  are  identified. 

5.4.6  Ability  to  Manage  Complexity 

Many  projects  which  are  undertaken  are  so  complex  that 
the  only  way  to  effectively  manage  the  work  is  through 
computer  systems.  The  computer  can  schedule  and  track  a 
project  of  thousands  of  activities  and  resources.  There  is 
no  way  that  a  team  of  workers  could  effectively  accomplish 
the  same  task.  The  sheer  amount  of  time  required  to  make 
the  initial  schedule  manually  would  render  that  schedule 
obsolete  by  the  time  it  was  complete.  It  would  be 
virtually  impossible  to  get  a  schedule  which  was  reasonably 
correct  or  leveled  to  any  extent  to  make  the  project 
economically  profitable.  A  large  complex  project,  such  as 
the  building  of  a  power  plant,  managed  without  computer 
assistance  would  be  comparable  to  accomplishing  the  work  by 
'the  seat  of  your  pants.' 

5.4.7  Reduced  Clerical  Work  Load 

The  time  required  to  retype  reports  which  incorporate 
project  schedules  and  other  planning  documents  is  greatly 
reduced  with  the  help  of  computers.  Word  processors  help 
with  routine  paperwork  and  construction  focussed  software 
aids  in  getting  reports  completed  accurately  and  on  time. 
Without  a  computer  a  clerical  worker  such  as  a  draftsperson 
might  spend  hours  producing  accurate  charts,  drawings,  and 
graphs    for    presentations    or    on-the-job   use.    When 
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construction  conditions  change,  they  may  spend  much  more 
time  redoing  the  work.  With  the  computer  and  the  proper 
software,  many  of  these  visual  aids  can  be  produced  and 
changed  as  the  project  is  being  updated.  This  results  in 
fewer  man  hours  required  to  complete  the  same  work  and  less 
repetitive  work  for  the  staff. 
5 . 5   Computer  Software  Available 

There  are  numerous  software  packages  available  on  the 
market  and  additionally  there  are  some  public  domain 
programs  which  are  available.  The  packages  discussed  here 
are  Primavera,  MicroTrak,  Open  Plan,  MacPro ject ,  and 
CPMREV,  a  program  written  by  myself  in  the  BASIC  computer 
language . 

5.5.1   MicroTrak 

The   software   used   for   analysis   is   a  demonstration 

program  which  will   handle  up  to  ten  activities.   Examples 

of  the  outputs  from  this  program  can  be  seen  in  Appendix  D. 

5.5.1.1   Characteristics  Capabilities  and 
Limitations 

The  system  is  menu  driven.  This  means  that  the 
user  is  given  prompts  on  each  screen  on  what  the  next 
step  is  or  what  the  possible  options  are. 

The  number  of  activities  which  a  registered 
version  of  the  program  can  use  is  stated  to  be  about 
5000.  This  limit  is  based  upon  the  use  of  a  hard  disk 
system.  If  floppy  disks  are  used  this  limit  is 
greatly  reduced. 
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This  program  is  based  upon  the  precedence 
scheduling  method  vice  the  arrow  method.  In  doing  so 
the  option  of  some  nonstandard  dependencies  may  be 
used.  The  program  supports  the  use  of  start  to  start, 
and  finish  to  finish  relationships  in  addition  to  the 
standard  finish  to  start  dependency.  In  addition, 
each  activity  may  depend  upon  up  to  nine  other 
activities.  If  more  than  nine  dependencies 
(predecessors)  are  identified,  dummy  activities  may  be 
used  to  bring  the  number  into  an  acceptable  range. 

A  work  calendar  is  also  generated  by  the 
program.  The  typical  work  week  is  identified  and  any 
scheduled  holidays  are  incorporated  into  this 
calendar .  The  calendar  can  be  generated  up  through 
the  year  2068,  well  beyond  any  reasonable  scheduling 
date. 

The  program  allows  for  user  defined  activity 
codes  but  it  will  provide  them  automatically  if 
desired.  Any  alphanumeric  combination  i.e.,  letters 
and  numerals,  of  up  to  nine  characters  is  accepted. 

Resources  can  also  be  managed  through  this 
program.  Up  to  ten  resources  per  network  or  activity 
may  be  tracked  and  the  resource  rates  may  be 
identified  by  either  a  daily  rate  or  a  total  amount. 
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Some  other  features  of  this  program  include  the 
ability  to  update  the  schedule  with  respect  to  new 
data  or  the  progress  of  the  project.  The  program 
allows  for  various  time  scale  adjustments  on  reports 
which  can  be  used  to  simplify  reports  or  to  make  them 
more  detailed  depending  upon  the  use  or  the  person 
targeted  to  receive  that  report .  The  program  can  also 
sort  the  output  data  by  a  group  code.  This  allows  for 
a  report  on  only  one  subcontractor's  work,  or  the  work 
of  a  given  trade,  etc.  This  can  be  used  in  any  way 
the  user  desires. 

This  program  will  not  level  the  resources. 
However,  the  manufacturer  indicates  that  they  will  be 
coming  out  with  a  supplemental  program  called 
LevelTrak  which  will  use  the  data  files  generated  by 
MicroTrak  to  level  the  project  resources.  There  is 
currently  no  additional  data  available  on  LevelTrak. 

5.5.1.2   Multi-Project  Resource  Planning 

To  date,  the  MicroTrak  program  can  not  schedule  a 
project  based  upon  resource  constraints  for  either  one 
or  several  projects.  The  output  generated  is  best 
suited  to  management  of  the  project  as  scheduled  by 
early  start.  The  management  can  base  their  resource 
requirements  upon  the  resource  demand  report 
generated.    By  having   this   they   should   be  able  to 
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resolve   any   conflicts  or  difficulties  before  the  fact 

since  all  resource  requirements  are  identified. 

At   this   time   the   capabilities   of  the  proposed 

program    LevelTrak  are   unknown.    When   the   program 

becomes   available   an  analysis   of   its  capabilities, 

limitations,   and   suitability   for  any  given  situation 

would  have  to  be  analyzed. 

5.5.2   Primavera 

Throughout   the   industry   Primavera   is  considered  the 

Rolls   Royce   of   scheduling   programs.   Although  it  is  very 

versatile   and   has   astounding   capabilities   far  exceeding 

needs    in  most   areas,   its   biggest   weaknesses   are   its 

inherent   complexity  and  the  lack  of  simple  graphic  output. 

Examples  of  the  output  are  shown  in  Appendix  E. 

5.5.2.1   Characteristics,  Capabilities,  and 
Limitations 

The  Primavera  system  is  a  menu  driven  system. 
There  is  a  help  screen  which  assists  the  user  in 
determining  the  proper  commands,  but  it  is  overall 
much  more  difficult  to  use  than  MicroTrak  due  to  the 
sheer  volume  of  information  required  to  drive  the 
system.  The  advantage  of  the  menu  system  is  that  a 
user  inexperienced  with  the  system  can  enter  or  access 
information  a  little  quicker. 

The  number  of  activities  which  can  be  considered 
for  scheduling  for  any  given  project  is  9000.  This  is 
far  more   than   even   sophisticated  construction  firms 
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are    likely   to   use.    In   addition,   each   of   these 
activities  may  have  up  to  ten  dependencies. 

Each  activity  may  have  six  different  resources, 
and  the  project  as  a  whole  may  have  up  to  96  different 
resources  tracked  and  leveled.  The  leveling  is 
performed  in  a  combination  of  the  two  manual  methods 
described  earlier.  The  program  will  accept  two  input 
parameters  for  leveling.  The  first  is  a  resource 
maximum  upper  limit  and  the  second  is  the  normal 
limit.  The  program  will  extend  the  duration  to  meet 
the  maximum  upper  limit  but  will  attempt  to  further 
level  the  project  to  the  normal  limit  without  further 
extension.  All  other  aspects  of  the  program  i.e., 
updating,  schedule  changing,  sorting,  and  time  scale 
adjustments,  are  comparable  with  those  described  for 
MicroTrak. 

An  overall  impression  of  this  program  is  that  the 
person  using  it  will  require  extensive  training,  both 
formal  and  informal,  to  use  it  effectively.  To  learn 
how  to  produce  a  few  standard  reports  and  documents 
may  take  only  a  few  weeks  of  effort,  but  to  learn  to 
fully  and  effectively  utilize  this  piece  of  software 
will  take  months  of  constant  practice,  and  'playing' 
with  the  system.  A  person  using  this  program  once  a 
week  will  probably  not  be  able  to  remain  proficient  at 
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it   even   if   he   had  all  the  training  and  knowledge  at 
one  time. 

5.5.2.2  Multi-Pro.ject  Resource  Planning 
Although  Primavera  is  one  of  the  state  of  the  art 
programs  on  the  market,  it  does  not  provide  for 
resource  planning  or  leveling  of  multiple  projects. 
The  version  reviewed  is  P3.  Any  newer  versions  are 
likely  to  incorporate  this  feature  so  they  may  remain 
competitive  with  products  such  as  Open  Plan  which  is 
to  be  discussed  next.  Currently  the  only  multiple 
project  option  available  with  version  P3  is  for  the 
scheduler  to  relate  the  leveling  of  concurrent 
projects.  This  can  be  done  by  starting  with  the 
earliest  project  in  chronological  sequence.  Level  the 
first  project.  Then  place  a  resource  limit  on  the 
second  project  equal  to  the  remaining  resources 
available  during  that  overlap  period.  By  doing  this 
the  total  maximum  limit  of  resources  during  any  time 
period  can  be  controlled,  but  the  results  are  not 
optimum  since  leveling  between  projects  does  not  take 
place.  This  solution,  however,  is  far  better  than  no 
solution  at  all.  In  general  it  will  prove  marginally 
satisfactory  since  the  leveling  of  the  projects 
themselves  will  tend  to  level  the  overall  company 
resource  demands,  and  achieving  the  most  imperative 
aspect   of   leveling  (remaining  under  the  maximum  limit 
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of    resources)    is    possible   although   tedious   and 

imperfect . 

5.5.3   Open  Plan 

Open    Plan   is   a   program  which  uses   the   database 

language   dBase   III   to   maintain  and  control  access  to  all 

the   data   files.    As   a  result,  the  purchaser  of  Open  Plan 

must   also   purchase   a   copy   of  dBase  III  if  a  copy  is  not 

already   available.    Examples  of  the  various  report  formats 

available  are  shown  in  Appendix  F. 

5.5.3.1   Characteristics,  Capabilities,  and 
Limitations 

The  Open  Plan  manual  provides  minimal  data  on  the 
program's  limitations  compared  to  what  was  provided  in 
the  other  software  packages.  However,  there  are  some 
differences  which  are  apparent. 

This  program  has  the  added  capability  to  use  a 
start  to  finish  dependency  in  addition  to  the  start  to 
start  and  finish  to  finish  dependencies  used  in 
Primavera  and  MicroTrak.  It  is  a  nice  addition  to  the 
system  but  this  relationship  is  used  very  little  in 
the  construction  industry. 

Open  Plan  is  also  menu  driven  which  means  that  it 
is  almost  as  easy  to  use  as  Primavera.  The  training 
time  for  this  program  as  compared  to  Primavera  is 
about  the  same.  Its  capabilities  and  complexity  are 
similar  so  it  is  not  reasonable  to  assume  that  an 
employee  could  become  proficient  with  the  program 
within  a  week. 


Resource  management  is  also  available  in  this 
package.  The  program  can  level  a  resource  based  upon 
a  fixed  time  or  it  can  schedule  based  upon  a  resource 
limit.  The  resource  limit  method  allows  the  project 
duration  to  be  extended,  whereas  the  leveling  method 
optimizes  the  resources  within  the  project  duration. 
The  program  also  allows  the  project  to  be  scheduled 
based  upon  the  resource  limitation  and  then,  if 
desired,  further  optimized  by  using  the  leveling 
option.  This  option  allows  the  scheduler  significant 
freedom  in  determining  just  how  he  wishes  to  schedule 
his  resources.  It  may  be  leveled,  'resource  limit' 
scheduled,  or  a  combination  of  both. 

5.5.3.2   Multi-Project  Resource  Planning 

The  program  allows  for  the  scheduling  of  multiple 
projects  but  the  interaction  is  really  rather 
limited.  The  method  whereby  the  additional  projects 
are  scheduled  is  very  much  as  described  in  the  multi- 
project  section  of  Primavera  only  in  this  case  it  is 
done  with  more  ease,  marginally  better  results,  and 
with  less  chance  of  error. 

The  procedure  the  program  uses  is  as  follows: 

1.  The  first  project  (or  the  project  considered 
to  have  the  highest  priority)  is  scheduled  based 
upon  the  resource  constraints  desired,  if  any. 
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2.  The  program  then  creates  a  temporary  file 
which  contains  the  resources  left  in  the  company 
pool,  i.e.  the  difference  between  resources 
consumed  by  the  project  considered  and  the  total 
amount  of  resources  available. 

3.  The  next  project,  with  respect  to  either 
priority  or  chronological  order,  is  identified  to 
the  program  as  also  needing  scheduling  based  upon 
resource  constraints. 

4.  The  computer  will  then  schedule  based  upon 
the  resource  limit  method  and  the  resources 
available  on  a  daily  basis  as  found  in  step  2. 
Again  the  remaining  daily  resources  are 
determined  and  placed  in  the  temporary  file. 

5.  The  process  can  then  be  continued  by 
repeating  steps  3  and  4  until  all  projects  are 
scheduled. 

The   process   as  described  above  will  not  give  the 

best   possible   answer.    The   reason   is   that   once  a 

project   is   scheduled  in  the  multi-project  process  the 

dates   are  fixed  and  the  scheduling  of  further  projects 

will   not  optimize  those  already  scheduled.   Using  this 

method   the   scheduling  may   not   give   an  acceptable 

answer  when  an  acceptable  answer  is  possible.   Assume 

for   instance   that   two  projects  are  being  considered. 

The   first   has  one  month  until  completion  and  it  needs 

to   use   ten  scrapers  for  two  weeks  anytime  during  that 

last   month.    Also   assume  that  a  second  project  needs 

ten   scrapers   for   its  first  two  weeks  of  work,  and  it 

is   scheduled  to  start  that  same  month.   If  the  company 

has   only   ten   scrapers   available   the   program  would 

delay     the     start     of     project     two    by 
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two  weeks.  This  is  not  the  best  solution  since  the 
first  project  may  have  the  scrapers  scheduled  for  the 
last  two  weeks  of  the  month  and  the  second  project 
could  use  the  scrapers  the  first  two  weeks  of  the 
month.  This  schedule  allows  the  contractor  to  start 
the  second  project  as  soon  as  possible  and  does  not 
delay  project  one  which  is  in  progress. 

The  developers  of  Open  Plan  describe  a  way  for 
users  to  avoid  this  problem,  but  it  takes  extensive 
knowledge  of  dBase  III  to  do  it.  The  process  is  to 
combine  all  of  the  dBase  project  files  into  one 
massive  integrated  project  file.  This  integrated 
project  is  then  leveled  as  if  it  were  the  only  project 
considered.  Following  leveling,  the  leveled 
integrated  project  file  must  be  separated  into 
individual  projects  again.  This  merging  and 
separating  is  the  problem  which  must  be  solved  by  the 
computer  programer.  For  a  person  experienced  in  dBase 
III  I  am  sure  this  would  not  be  a  difficult  hurdle. 
It  might  even  be  possible  to  write  a  program  which 
would  perform  the  process  whenever  called  upon. 

Since  the  authors  of  the  program  recognize  the 
faults  in  the  current  multi-project  planning  method, 
and  they  even  describe  the  solution  in  their  manual, 
it  is  likely  that  there  will  be  an  automatic  function 
or    option   which  will   perform   the   combining   and 
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separating   operations   mentioned   above   in   a   future 

edition  of  Open  Plan. 

5.5.4   MACPROJECT 

This  program  is  written  for  the  Macintosh  computer. 
It  is  very  easy  to  use  as  is  typical  with  the  user  friendly 
menu  driven  systems  which  are  predominant  in  Macintosh 
programs.  Some  typical  examples  of  the  program's  output 
are  shown  in  Appendix  G. 

5.5.4.1  Characteristics,  Capabilities,  and 
Limitations 

MacPro ject   is   very   easy  to  use  as  compared  with 

most   other   commercial   programs  on  the  market.   It  is 

able   to   evaluate   up   to   2000   activities   with   six 

resources   per   activity   and   fifty  resources   per 

project.    There   are  two  major  drawbacks  however:   the 

dependencies   are   limited  to  'finish-to-start'  and  the 

resources    are    identified    by   name   only  with   no 

reference  to  the  number  required. 

5.5.4.2  Problems 

The  problem  with  the  dependencies  can  be 
partially  solved  by  editing  the  schedule  after  it  has 
been  •  calculated.  A  delay  between  the  finish  of  one 
activity  and  the  start  of  the  next  may  be  scheduled  by 
forcing  the  start  date  of  the  following  activity  to  a 
given  date.  For  example  if  'remove  forms'  was  to 
follow  'place  concrete'  by  two  days,  the  schedule 
would   be   originally  determined   based   upon  a  normal 
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dependency.  The  output  would  be  analyzed  to  determine 
if  the  activity  of  removing  forms  followed  placing  the 
concrete  by  less  than  two  days.  If  so,  it  would  be 
forced  into  starting  a  couple  of  days  later  by 
specifying  that  it  depends  on  a  date,  based  on  the 
original  schedule  determined,  rather  than  another 
activity.  Another  method  would  be  to  place  a  two  day 
dummy  activity  called  'wait'  between  'remove  forms' 
and  'place  concrete'.  This  would  have  the  same  effect 
without  having  to  run  the  program  twice. 

The  other  drawback  is  the  method  used  to  account 
for  resources.  As  indicated  above,  resources  can  be 
considered  but  there  is  no  mechanism  for  specifying 
the  number  of  units  required.  This  can  best  be 
explained  by  example.  In  the  programs  discussed  above 
the  user  could  define  a  category  called  'laborers'. 
He  may  use  this  category  for  most  of  his  activities, 
but  the  number  of  laborers  needed  for  each  activity  is 
likely  to  change.  Suppose  he  requires  four  laborers 
for  the  first  activity  and  ten  laborers  for  the  second 
activity.  He  tells  the  computer  he  needs  laborers  and 
indicates  a  requirement  for  four  and  ten 
respectively.  In  MacProject  the  solution  is  not  so 
simple.  The  resources  will  be  listed  by  category 
only.  If  you  have  four  laborers  you  may  write  "4 
Laborers"   or   you  may  enter  laborers  four  times  using 
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four  of  the  six  resource  spaces  available.  If  this  is 
to  stand  alone  the  solution,  though  cumbersome,  would 
be  satisfactory,  but  as  soon  as  we  enter  the  second 
activity  which  needs  ten  laborers  we  have  a  problem. 
Listing  laborer  ten  times  is  out  of  the  question  since 
the  program  will  only  accept  six.  In  addition, 
entering  "10  Laborers"  is  unsatisfactory  since  the 
program  does  not  recognize  its  relationship  with  the 
"4  Laborers"  used  for  activity  one.  The  result  can  be 
quite  confusing  when  trying  to  determine  actual 
resource  requirements. 

In  addition  to  the  difficulty  in  accounting  for 
resources,  the  output  is  confusing,  and  not  very 
practical.  As  can  be  seen  in  Appendix  G,  the  output 
is  organized  by  resource  category.  In  the  sample 
output,  sitework  is  listed  twice  under  the  category  of 
'laborer'  and  clean  up  is  listed  three  times.  This 
indicates  that  you  need  two  laborers  for  sitework  and 
three  for  clean  up.  There  is  not  much  of  a  problem 
here  but  it  would  be  very  confusing  if  more  than  six 
workers  were  needed  for  any  given  activity  or  if  there 
were  many  activities  which  needed  the  same  resource. 
The  output  would  become  quite  cumbersome  and  difficult 
to  handle  very  quickly.  As  it  is,  it  is  only  useful 
for  very  simple  projects  and  resource  requirements. 
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5.5.4.3   Multi-Project  Resource  Planning 

The   program  does  not  automatically  resource  level 

or   optimize   at   all   although  it  may  help  the  user  in 

leveling   and   optimizing   by   the   traditional   method 

described   earlier.    But   even   this   is  tedious  to  do 

since   the   resource   output   is   so   poorly  formatted. 

Multiple   project  planning  is  not  possible  since,  other 

than   doing   it   manually,   any   attempt   at   resource 

leveling   for   any   but   the   simplest   of  schedules  is 

futile  using  this  program. 

5.5.5   CPMREV 

This   program   has   been   rewritten  numerous  times  over 

the   last   nine   months.    It  started  as  a  computational  CPM 

program   in   the   BASIC  language,  written  by  Robert  D.  Rotz, 

and   has   been   rewritten   and  revised  dozens  of  times  since 

September   1986.    Since   this   program  was  not  written  by  a 

professional   computer  programer  it  does  not  have  all  of  the 

exceptional   capabilities   of  the  higher  priced  packages  but 

it   shows   that  development  of  a  software  package,  while  not 

easy,  is  not  impossible  either. 

5.5.5.1   Characteristics,  Capabilities,  and 
Limitations       , 

The   program  will   schedule   up  to  100  activities 

providing  early  start,  late  start,  early  finish,  late 

finish,    total    float,    and   identification  of   the 

critical   path.    The  program  also  provides  a  bar  chart 

of  the  schedule   based  upon  the  early  start  dates. 
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The  output  provided  is  in  the  form  of  five 
reports : 

1.  A  listing  of  the  project  activities,  the 
daily  costs,  resource  demands,  and  dependencies. 

2.  A  listing  with  the  start  and  finish  times 
for  each  activity  plus  the  total  costs  for  both 
the  activities  and  the  project. 

3.  A  bar  chart  schedule  based  upon  early  start 
dates . 

4.  A  histogram  of  the  project  resource  demands 
based  upon  the  early  start  schedule. 

5.  A  histogram  of  resource  demands  of  multiple 
projects  based  upon  their  respective  early  start 
dates . 

All   tables  and  graphs  which  are  produced  on  the  screen 

can   be   printed   on   an   eighty   column  IBM  compatible 

printer . 

The  program  will  track  up  to  five  different 
resources  for  each  activity  and  project.  This  means 
that  up  to  five  histograms  of  resource  requirements 
can  be  produced  for  each  project.  This  program, 
however,  only  provides  an  aggregation  of  the  resources 
needed  based  upon  early  start  dates  and  does  not  do 
any  resource  leveling  or  rescheduling  based  upon 
resource  limitations. 

This  program  is  very  easy  to  use  compared  to 
those  discussed  earlier.  Nearly  anyone  could  learn  to 
use  the  program  in  under  an  hour,  and  feel  comfortable 
with  all  the  features  within  a  day. 
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Examples  of  the  output  for  both  single  and 
multiple  projects  are  shown  in  Appendix  H,  followed  by 
a  listing  of  the  program. 

5.5.5.2   Multi-Pro.ject  Resource  Planning 

The  program  has  the  capability  to  provide  a 
listing  and  histogram  of  the  aggregate  resource  sum 
from  any  number  of  projects. 

How  the  output  is  obtained  can  be  explained  best 
by  describing  the  steps  involved.  The  program  first 
asks  the  user  to  identify  from  the  available  list 
which  project  is  to  be  considered.  Once  this  is  done 
the  program  displays  on  the  screen  the  resources 
identified  for  that  project.  The  user  then  selects 
the  appropriate  resource  from  that  list.  The  computer 
records  the  dates  and  resource  demands ,  and  asks  the 
user  if  his  is  finished  or  if  he  wants  to  add  another 
project  resource  from  the  list.  He  may  add  another 
resource  from  the  same  project  or  he  may  go  to  a 
different  project  and  add  a  resource  from  there  using 
the  same  steps  used  before. 

This  option  to  add  resources  not  only  between 
projects  but  within  projects  can  be  useful  to  the 
planner  involved.  The  total  number  of  persons  on  the 
job  may  be  of  concern  to  the  superintendent  of  the 
project.  He  may  only  have  an  output  which  shows 
individually   how   many    carpenters,    steelworkers, 
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masons,  and  painters  are  on  the  job,  but  not  the  sum 
total.  The  same  analysis  could  be  used  for  different 
types  of  equipment  used  on  the  same  project.  To  take 
the  setup  one  step  farther,  the  program  also  has  the 
capability  to  give  an  indication  of  how  many  tradesmen 
are  employed  by  the  company  on  any  given  day  even  if 
they  are  not  broken  out  under  a  total  manpower 
resource  heading.  The  suras  from  each  individual 
project  can  be  found  and  added  to  the  values  of 
subsequent  projects  in  the  same  way. 
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CHAPTER  6 
CONCLUSION 

Although  there  are  many  different  approaches  to 
resource  planning  for  both  single  and  multiple  projects, 
construction  firms  need  to  recognize  the  importance  of 
resource  management  and  find  an  acceptable  means  to  control 
their  costs  in  this  area.  The  scheduling  and  resource 
management  methods  discussed  in  this  paper  need  to  be  an 
integral  part  of  that  control  and  should  be  incorporated 
into  the  companies  comprehensive  resource  control  plan. 
Regardless  of  the  method  used,  the  computer  and  its 
associated  software  is  ideally  suited  for  the  task  of 
resource  management  thorough  scheduling.  The  time  required 
by  schedulers  and  planners  to  update  and  modify  schedules 
IS      greatly  reduced  through  their  use. 

Of  the  programs  evaluated  here,  the  best  overall 
manager  of  resources  was  Open  Plan.  Although  the 
difficulty  level  is  relatively  high  for  this  program,  any 
construction  companies  which  have  at  least  one  or  two  full 
time  schedulers  and  planners  would  not  go  wrong  to  invest 
in  a  similar  system.  Small  companies  should  look  at 
available  software  in  addition  to  what  has  been  described 
here  to  find  a  program  which  is  easier  to  use,  and  has  at 
least  some  of  the  resource  aggregation  functions,  such  as 
MicroTrak.  Optimally,  it  should  have  resource  leveling 
capabilities  as  well. 
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The  day  that  multiple  project  resource  leveling 
becomes  more  the  norm  rather  than  the  exception  is  coming 
but  it  is  not  here  yet.  Right  now  there  are  very  few 
programs  which  can  effectively  handle  multiple  projects. 
Open  Plan  is  one  of  the  first  to  open  that  door  and  even 
they  have  not  committed  themselves  to  its  full  development. 

Resource  planning  is  just  now  becoming  a  common  focus 
of  computer  software.  In  the  next  few  years  the  trend  is 
likely  to  continue  as  demand  for  such  software  rises.  The 
result  will  be  better  resource  management  tools  via 
computers  and,  ultimately,  more  efficient  and  less  complex 
multi-project  resource  planning. 
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rh:soxjf«z:e  rate  diste^xbutioi^ 


taken  fron 
Robert  B.  Harris,  Precedence  and  Arrow  Networking 
Techniques  for  Construction,  John  Wiley  and  Sons,  Inc., 
New  York,  1978,  p. 156. 
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(a)  As  assumed 
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(b)  Probably  as  practiced 
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(e)   Variable  resource  rates 


Fiy.   A.l     Typical  resource  rate  variation, 
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taken  from 
Robert  B.  Harris,  Precedence  and  Arrow  Networking 
Techniques  for  Construction,  John  Wiley  and  Sons,  Inc., 
New  York,  1978,  chap.  11. 
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Fi^.  B.l  Precedence  dia^jram. 


Early  Start  Schedule  Information 

Activity 

T 

ESD 

EFD 

77- 

/T 

Res 
Rate 

Res 

Days 

A* 
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4 

0 

2 

8 

B 

2 

0 

2 

7 

6 

2 

4 

C 

2 

4 

6 

4 

4 

4 

8 

D* 

4 

4 

8 

0 

6 

24 
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1 

8 

9 

1 

1 

1 

1 

F* 

2 

8 

"   10 

0 

2 

4 

Total 

49 

*  Critical. 


Fiy.  B.2  Schedule  information  chart. 
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Days 


Step 
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5 
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B  - 

-  2 

C  - 

-  4 

2 

3 

1 1 

•« 

E  -   1 

4 

C-1 

4 
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4 
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2 

2 

2 
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10 
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10 

6 

+4 
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+4 

3 

+4 

2 
+4 
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+  1 

=  49 
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6 
6 

10 

-4 
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■Z2 

C-1 

6 
6 

10 

-4 

10 

13 

C-l 

6 
6 

10 

-4 
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Z4 
E-1 

6 
6 

7 
-1 

6 

+  1 

15 
E-1 

6 
6 

7 
-1 

26 

6 

1 

Fi^.  B.3  Leveling  bar  chart  -  traditional  approach. 


5         6         7         8 
Project  days 


Fi^.   B.4     Resource  histogram. 
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taken  frcxn 
Robert  B.   Harris,  Precedence  and  Arrow  Networking 
Techniques  for  Construction,  John  Wiley  and  Sons,   Inc., 
New  York,   1978,   chap.   11. 
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MINIMUM  MOMENT  PROCEDURES 

Setup 

A.  Prepare  an  arrow  or  precedence  network  of  the 
project  and  determine  the  sequence  step  number  for 
each  activity. 

B.  Prepare  a  link  matrix  and  compute  the  ESD  and  EFD 
for  each  activity.   Compute  the  lags  for  each 
link,   Determine  the  total  float  for  each  activity 
and  identify  the  critical  path. 

C.  Select  a  resource  to  be  leveled. 

D.  Determine  the  amount  of  the  selected  resource 
which  is  required  per  day  for  each  network 
activity.   Call  this  required  resource  rate,  "r." 

E.  Prepare  a  bar  chart  showing  the  early  start  time 
for  each  activity  and  its  duration.   Plot  critical 
activities  first,  followed  by  noncritical 
activities . 

F.  For  each  day  of  the  project,  total  the  resource 
rates  at  the  foot  of  the  bar  chart  to  obtain  the 
daily  resource  sums. 

Procedure 

The  procedure  begins  with  the  activities  on  the  last 
sequence  step. 

1.  Examine  the  activities  on  the  sequence  step. 

(a)  Every  activity  an  the  sequence  step  having 
zero  free  float  is  passed  over. 

(b)  Every  activity  on  the  sequence  step  having  a 
zero  resource  rate  is  shifted  to  the  limit 
of  the  activity  free  float  to  allow 
preceding  activities  to  be  shifted. 

(c)  For  each  activity  on  the  sequence  step 
having  a  positive  resource  rate,  determine 
the  extent  of  its  free  float  and  compute 
improvement  factors  for  all  possible  days 
that  the  activity  can  be  shifted  until  the 
free  float  limit  is  reached. 

2.  Select  the  activity  having  the  largest  improvement 
factor  determined  in  algorithm    step  1(c). 
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(a)  If  the  largest  improvement  factor  is 
negative,  no  shifting  takes  place.   Go  to 
the  next  sequence  step  and  examine  the 
activities  as  in  algorithm  step  1. 

(b)  If  there  is  a  tie  in  the  value  of  the 
largest  improvement  factor  for  several 
activities : 

i.     select  the  activity  with  the  greatest 
"r"  value. 

ii.    If  still  tied,  select  the  activity 
with  the  greatest  free  float  for 
preceding  activities. 

iii.   If  still  tied,  select  the  activity 
with  the  latest  start  date. 

iv.    If  still  tied,  select  the  activity 

with  the  first  activity  in  the  queue 

3.  Shift  the  selected  activity  subject  to  the 
following: 

(a)  If  the  largest  improvement  factor  is  zero  or 
positive,  shift  the  selected  activity  by 
subtracting  the  activity  resource  rate  from 
each  of  the  daily  resource  sums  at  the 
position  being  vacated  and  adding  this  same 
rate  to  each  of  the  daily  resource  sums  at 
the  position  being  occupied. 

(b)  If  there  is  a  tie  in  the  value  of  the 
improvement  factor  at  several  of  the 
possible  activity  positions,  shift  the 
activity  the  greatest  number  of  time  units. 

4.  If  shifting  has  occurred  in  algorithm  step  3, 
update  the  lags,  ESD  and  EFD,  in  the  link  matrix. 

5.  Reexamine  the  activities  on  the  sequence  step  and 
repeat  algorithm  steps  1  through  4  until  all 
shifting  is  complete  on  this  step. 

6.  Examine  the  next  earlier  sequence  step  an  repeat 
algorithm  steps  1  through  5.   Continue  in  this 
manner  until  all  activities  have  been  considered 
and  all  possible  shifting  has  taken  place  on  every 
sequence  step. 
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7.  Repeat  algorithm  steps  1  through  6  until  no 
further  shifting  takes  palace.   This  is  the  end  of 
the  forward  cycle. 

8.  Beginning  with  the  first  sequence  step,  using  back 
float  instead  of  free  float,  and  progressing  to 
the  next  latest  sequence  step  instead  of  to  the 
next  earliest  sequence  step,  repeat  algorithm 
steps  1  through  7  until  all  activities  have  been 
considered  and  shifted,  where  possible,  to  an 
earlier  time  position.   This  is  the  end  of  the 
backward  cycle  and  completes  the  leveling. 
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Sequence  Step  Numbers  Computed  for  an  Arrow  Network 
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Step 
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Fi^.  C.l  Sequence  step  chart. 
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Fi^.  C.2  Matrix  before  leveling. 


68 


J  Activity 


ACT 

T 

ESD 

ST 
0 

0 

A 
4 
0 

B 

2 
07 

c 

2 

D 
4 
4 

E 
1 

F 
2 
8 

FIN 
0 
10 

^EFD 

FF 

\    0 

0 
0 

B2 
7 

',* 

ST 
0 

'T  \  0 

"^.^ 

'0A 

0 

A 

4 

\     n 

\ 

4 

0 

Kp 

r/5 

B 
^4 

^ 

/s 

\>ro 

>ro 

c 

^10 

\^o 

iro 

'> 

\o. 

01 

0 

D 
8 

u 

< 

\ 

1 

0 

Vo 

ro 

E 
?10 

\   vn 

^ 

ro 

\? 

0 

F 
10 

x| 

0 

^e 

FIN 
10 

\ 

ACT 


Fig.  C.3  Matrix  at  end  of  forward  pass. 
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Fi^.  C.4  Matrix  at  end  of  backward  pass. 
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Fig.  C.5  Le\^eling  bar  chart  -  minimum  moment. 


70 


miofwdtrak: 


71 


HEDULE:  DEMO  OF  MICROTRAK 
N  DATE  =  02MAY83  Rev   1 
T I VI TY-WI THIN-RESOURCE 


MICROTRAK 


BASE  DATE 
DATA  DATE 
CUT  OFF  DATE  = 


=  100CT83 


ACTIVITY 
MBER     DESCRIPTION 


RESOURCE  DOLLARS  

DURATION  DAILY  TOTAL    DAY      TOTAL 


SOURCE  1  =  CARPENTERS 


build  forms 
set  forms 


7 
2 


4 
1 


28 
2 


0 
0 


0 
0 


TOTAL 


30 


SOURCE  2  =  STEEL  WORKERS 


pre-bend  re-steel 
set  re-steel 


4 
3 


4 
4 


16 
12 


0 
0 


0 
0 


TOTAL 
SOURCE  3  =  LABORERS 


28 


build  forms 
pre-bend  re-steel 
excavate 
set  forms 
set  re-steel 
place  concrete 


7 

8 

56 

0 

0 

4 

4 

16 

0 

0 

8 

8 

64 

0 

0 

2 

4 

8 

0 

0 

3 

8 

24 

0 

0 

1 

6 

6 

0 

0 

TOTAL 


174 
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CHEDULE:  DEMO  OF  MICROTRAK 
UN  DATE  =  02MAY83  Rev   1 
ESOURCE-WI THIN- ACTIVITY 


MICROTRAK 


BASE  DATE 
DATA  DATE 
CUT  OFF  DATE  = 


=  100CT83 


ACTIVITY 
UMBER     DESCRIPTION 


RESOURCE  DOLLARS  

DURATION  DAILY  TOTAL    DAY       TOTAL 


build  forms 

CARPENTERS 
LABORERS 


7 
7 


4 
8 


28 
56 


0 
0 


0 
0 


TOTAL 


84 


pre-bend  re-steel 

STEEL  WORKERS 
LABORERS 


4 

4 


4 
4 


16 

16 


0 
0 


c 

c 


TOTAL 


32 


excavate 


set  forms 


LABORERS 


TOTAL 


CARPENTERS 
LABORERS 


8 

8 

64 

0 

c 

64 

•-■' 

c 

2 

1 

2 

0 

c 

2 

4 

8 

0 

f 

TOTAL 


10 


set  re-steel 

STEEL  WORKERS 
LABORERS 


3 

3 


4 
8 


12 

24 


0 
0 


TOTAL 


36 


place  concrete 

LABORERS 

TOTAL 


6 
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ICHEDULE:  DEMO  OF  MICROTRAK  BASE  DATE     =  100CT8C 

DATE  =  02MAY83  Rev   1  MICROTRAK  DATA  DATE     =  

DULE  REPORT  by  EARLY  START  CUT  OFF  DATE  =  

ACTIVITY  DAYS      START  FINISH         FREE  TOTAL 

3ER     DESCRIPTION  LEFT  EARLY     LATE  EARLY     LATE    FLOAT  FLOAT 

move  in  2  100CT83   100CT83  110CT83   110CT83     0       0 

excavate  8  120CT83   120CT83  210CT83   210CT83     0      0 

pre-bend  re-steel       4  120CT83   180CT83  170CT83   210CT83     4      4 

build  forms  7  120CT83   140CT83  200CT83   240CT83      1       2 

set  re-steel  3  240CT83   240CT83  260CT83   260CT83     0      0 

set  forms  2  240CT83   250CT83  250CT83   260CT83      1       1 

place  concrete  1  270CT83   270CT83  270CT83   270CT83     0      0 
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EDULE:  DEMO  OF  MICROTRAK 

DATE  =  02MAY83  Rev   1 
E  SCALE  REPORT  by  EARLY  START 


MICROTRAK 


BASE  DATE 
DATA  DATE 
CUT  OFF  DATE  = 


=  100CT83 


Act  i vi  ty 
ber     Descript 1  on 
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OCT 
10 
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build  forms 
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set  forms 
place  concrete 
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> 
> 
> 


>>  . 

>  =  > 
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e:HEDULE:  DEMO  OF  MICROTRAK 

UN  DATE  =  02MAY83  Rev   1 

'[ME  SCALE  REPORT  by  EARLY  START 


MICROTRAK 


BASE  DATE 
DATA  DATE 
CUT  OFF  DATE  = 


=  100CT83 


Activity 
hmber     Description 


1983 


OCT 
10 


11 


12 


13 


14 


17 


18 


19 


20 


move  in 
excavate 

pre-bend  re-steel 
build  forms 
set  re-steel 
set  forms 
place  concrete 


> 

> 
> 


AVERAGE  DAILY 
CARPENTERS 
STEEL  WORKERS 
LABORERS 

TOTAL  RESOURCE 

RESOURCE  COST 
DIRECT  COST  (K 


RESOURCE 

0 

0 

4 

4 

4 

4 

4 

4 

4 

S 

0 

0 

4 

4 

4 

4 

0 

0 

0 

0 

0 

20 

20 

20 

20 

16 

16 

16 

0 

0 

28 

28 

28 

28 

20 

20 

20 

(K$) 

0 

0 

0 

0 

0 

0 

0 

0 

0 

$) 

0 

0 

0 

0 

0 

0 

0 

0 

0 

TOTAL  COST  (K$) 
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[HEDULE:  DEMO  OF  MICROTRAK 

N  DATE  =  02MAY83  Rev   1 

!ME  SCALE  REPORT  by  EARLY  START 


MICROTRAK 


BASE  DATE 
DATA  DATE 
CUT  OFF  DATE 


=  100CT83 


I  Activity 

inber     Description 


1983 


OCT 
21 


24    25    26 


27 


28 


31 


NOV 
01 


02 


move  in 
excavate 

pre-bend  re-steel 
build  forms 
set  re-steel 
set  forms 
place  concrete 


> 
> 
> 

> 


AVERAGE  DAILY  RESOURCE 

CARPENTERS  011000000 

STEEL    WORKERS  044400000 

LABORERS  8  12  12  8  6  0  0  0  0 

TOTAL  RESOURCE  8     17    17    12    6     0     0     0     0 


RESOURCE  COST  (K$) 
DIRECT  COST  (K$) 


0 
0 


0 
0 


0 
0 


0 
0 


0 
0 


0 
0 


0 
0 


0 
0 


0 
0 


TOTAL  COST  {K$) 


0 
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PRIMAVERA  PROJECT  PLANNER 
Summary  of  Available  Reports  Page    1 

Series      E£l.j.No^  E££££l_Iilil 

A         SR-01  Demo  Sched  Rep  -  Sorted  by  ES ,  TF 

SR-02  Demo  Sched  Rep  -  Sorted  by  TP,  ES 

SR-04  Demo  Sched  Rep  (with  log)  -  Sorted  by  ES ,  TF 

SR-05  Demo  Sched  Rep  -  Skipping  by  first  code 

SR-06  Demo  Sched  Rep  (analysis  with  successors) 

SR-07  Demo  Sched  Rep  (det  prd  &  sue)  -  by  Act  # 

BC-02  Demo  Bar  Chart  (Daily,  one  bar)  by  ES ,  TF 

BC-03  Demo  Bar  Chart  (Weekly,  2  bars)  by  ES.TF 

BC-04  Demo  Bar  Chart  (Weekly,  1  bar)  skip  by  1st  code 

NL-01  Demo  Network  Logic  Rep  for  Critical  Path 

RC-01  Demo  Resource  Control  Report  by  activity 

RT-01  Demo  Resource  Usage  (Tabular)  -  selected  res. 

RU-01  Demo  Profile  of  Resource  Usage  -  weekly  sel.  res 

RR-01  Demo  Cumulative  Profile  of  Resource  -  weekly 

CC-01  Demo  Summary  Cost  Report  -  selected  resources 

CC-02  Demo  Cost  Control  Report  -  by  activity 

CT-01  Demo  Cash  Flow  Report  (Tabular)  -  Monthly 

CE-01  Demo  Earned  Value  Report 

CU-01  Demo  Cost  Profile  -  weekly 

CR-01  Demo  Cumulative  Cost  Profile  -  weekly 

RP-01  Sample  Productivity  Report 

CP-01  Sample  Price-Rates  Report 

SR-03  Demo  Schedule  Report  with  activity  budgets 

SR-08  Demo  Summary  Schedule  Report  with  Budgets 

RU-02  PROFILE  OF  PLUMBERS . CARPENTERS ,  ELECTRICIANS 
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ierican  Community  Developers,  Inc. 

IPORT  DATE  23HAY87  RUN  NO.   14 

|01  Demo  Network  Logic  Rep  for  Critical  Path 


PRIHAVERA  PROJECT  PLANNER 
NETHORK  PATH  ANALYSIS 


Hulti  Family  Housing  Project 

START  DATE  13DEC82  FIN  DATE  6SEP84 

DATA  DATE  1FEB83   PAGE  NO.    1 
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X  ACT  NO.       9  X 

X  X 

'OTAL   X  GRANULAR  FILL    X 

•LOAT   X  X- 

-20   X  X 

X  X 

XOD   7  RD   7  PCT  OX 

XXXXXXXXXXXXXXXXXXXXXX 

ES  8FEB83  EF  16FEB83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  3  X 
X  X 

X  SOIL  STABILIZATI  X 
>X  ON  X- 

X  X 

X  X 

XOD  15  RD  0  PCT100X 
XXXXXXXXXXXXXXXXXXXXXX 
ES  28DEC82A  EF  20JAN83A 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  5  X 
X  X 

X  PLUMBING-STREET   X 
->X  CONNECTION  AND  U  X- 
X  NOERSLAB        X 
X  X 

XOD  8  RD  3  PCT  52X 
XXXXXXXXXXXXXXXXXXXXXX 
ES  24JAN83A  EF  3FEB83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  13  X 
X  X 

X  TERMITE  PROTECTI  X 
->X  ON  X- 

X  X 

X  X 

XOD  13  RD  13  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  17FEB83  EF  8HAR83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  22  X 
X  X 

X  CONCRETE  SLAB  ON  X 
->X   GRADE         X- 
X  X 

X  X 

XOD  5  RO  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  9MAR83  EF  15MAR83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  7  X 
X  X 

X  FOUNDATION  EXCAV  X 
->X  ATION  X- 

X  X 

X  X 

XOD  5  RO  2  PCT  SOX 
XXXXXXXXXXXXXXXXXXXXXX 
ES      A  EF  7FEB83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  24  X 
X  X 

X  CURING  TIME     X 

->X  X > 

X  X 

X  X 

XOD  13  RD  13  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  15MAR83  EF  1APR83 


XXXXXXXXXXXXXXXXXXXXXX 


XXXXXXXXXXXXXXXXXXXXXX 
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X  ACT  NO. 
X 

SET  PRECAST  CONC 

RETE  PANELS 


X 

X 

X 

X 

XOD  10  RO  10  PCT 

XXXXXXXXXXXXXXXXXXXXXX 

ES  4APR83  EF  15APR83 


X 
X 
X 

X- 
X 
X 
OX 
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GROUT  PRECAST  PA 
NELS 


X  ACT  NO. 
X 
X 
->X 
X 
X 

XOD   6  RD   6  PCT 
XXXXXXXXXXXXXXXXXXXXXX 
ES  11APR83  EF  18APR83 


X 
X 
X 
X- 
X 
X 
OX 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  30  X 
X  X 

X  INSTALL  METAL  ST  X 
->X  AIRS  X- 

X  X 

X  X 

XOD  50  RD  50  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  19APR83  EF  28JUN83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  32  X 
X  X 

X  PLATES,  LINTELS,  X 
■>X   AND  ROOF  TRUSSE  X- 
X  S  X 

X  X 

XOD  23  RD  23  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  29JUN83  EF  1AUG83 
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.OAT 

-20 

XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.      34  X 
X               X 
X  REDWOOD  FASCIA, S  X 

X  OFFIT  AND  PLYWOO  X 

X  D  DECKING       X 
X              X 
XOO  20  RD  20  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  2AUG83  EF  29AUG83 

XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.      41  X 
X               X 
X  DRY  SHEETING     X 
->X               X- 
X               X 
X               X 
XOD   5  RO   5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  30AU683  EF  5SEP83 

XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.      43  X 
X               X 
X  STOCK  BULK  MATER  X 
sv  TAi  iMcinp  Riiii  n  y- 

XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.      45  X 
X              X 
X  SET  INFILL  PANEL  X 

X  ING           X 
X               X 
XOD   4  RD   1  PCT  62X 
XXXXXXXXXXXXXXXXXXXXXX 
ES      A  EF  6SEP83 

X              X      1 
X             X      1 

XOD   3  RD   3  PCT  OX      | 
XXXXXXXXXXXXXXXXXXXXXX       1 
ES  7SEP83  EF  9SEP83      | 

1.DTAL 

.OAT 

-20 

1 
V 

XXXXXXXXXXXXXXXXXXXXXX 

X  ACT  NO.      47  X 

X               X 

X  WINDOWS        X 

X               X 

X              X 

X              X 

XOD   0  RD   0  PCT  OX 

XXXXXXXXXXXXXXXXXXXXXX 

ES  13SEP83  EF  19SEP83 

XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.      49  X 
X               X 
X  WOOD  SIDING      X 
->X               X- 
X               X 
X               X 
XOD   0  RD   0  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  20SEP83  EF  29SEP83 

XXXXXXXXXXXXXXXXXXXXXX 

X  ACT  NO.      66  X 

X               X 

X  WALL  INSULATION   X 
>y                  Y 

X               X 
X               X 

XOD   0  RD   0  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  30SEP83*  EF  60CT83* 

XXXXXXXXXXXXXXXXXXXXXX 


X  ACT  NO. 

68  X 

X 

X 

S   3 

X  EXTERIOR  RAILING  X 

TO 

X 

A 

X 

TF   172 

X 

X 

XOO   6  RD 

6  PCT  OX 

XXXXXXXXXXXXXXXXXXXXXX 

ES  50CT83 

EF  120CT83 

TO 
TF   -13 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  70  X 
X  X 

X  SHEETROCK  WALLS   X 
->X  X 

X  X 

X  X 

XOD  25  RD  25  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  70CT83  EF  10NOV83 
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I   S   2 
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X  ACT  NO.      67  X 
X  X 

X  CONCRETE  STAIRS  X 


TO 

■>x 

X 

X 
X 

TF 
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X 

X 

XOD 
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XXXXXXXXXXXXXXXXXXXXXX 

ES 
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EF 
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X 
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)0  13  RO  13  PCT  OX 
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15MAR83  EF  1APR83 
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X  ACT  NO 

X 

X 

X 

X 

X 

XOD  10  RD  10  PCT 

XXXXXXXXXXXXXXXXXXXXXX 

ES  4APR83  EF  15APR83 


X 
X 
X 
X- 
X 
X 
OX 


S   5 


TO 
TF   -20 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  27  X 
X  X 

X  GROUT  PRECAST  PA  X 
■>X  NELS  X 

X  X 

X  X 

XOD  6  RD  6  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  nAPR83  EF  18APR83 


XXXXXXXXXXXXXXXXXXXXXX 


TO 
TF   -20 


X  ACT  NO. 

30 

X 

X 

X 

X 

INSTALL  METAL  ST 

X 

>X 

AIRS 

X 

X 

X 

X 

X 

XOD  50  RD 

50 

PCT 

ox 

XXXXXXXXXXXXXXXXXXXXXX 

ES 

19APR83 

EF 
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X  X 

X  FRAME  INTERIOR  W  X 


TO 

>X 
X 

ALLS 

X 

X 

TF 

56 

X 

X 

XOD 
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XXXXXXXXXXXXXXXXXXXXXX 

ES 
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84 


i'ican  Contmum'ty  Developers,  Inc. 

E)RT  DATE  23HAY87  RUN  NO.   14 

LI  Demo  Network  Logic  Rep  for  Cn'tical  Path 


PRIHAVERA  PROJECT  PLANNER 
NETWORK  PATH  ANALYSIS 


Hulti  Family  Housing  Project 
START  DATE  13DEC82  FIN  DATE  6SEP84 
DATA  DATE  1FEB83   PAGE  NO.    6 


(XXXXXXXXXXXXXXXXXXXX 

ACT  NO.      41  X 

X 

X 

DRY  SHEETING    X 

X ) 

X   FROM 
X  TF   -20 

10   5  RD   5  PCT  OX 

XXXXXXXXXXXXXXXXXXXX 
30AUG83  EF  5SEP83 

XXXXXXXXXXXXXXXXXXXX 
ACT  NO.      52  X 

X 

X 

X ) 

X   FROM 
X  TF   56 
OX 


INSTALL  TUB,  STA 
CK  OUT  PLUMBING 


D  4  RD  4  PCT 

XXXXXXXXXXXXXXXXXXXX 

17HAY83  EF  20MAY83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  58  X 
X  X 

TAL  X  ROOF  SHINGLES  X 
I  OAT   X  X- 

-18   X  X 

X  X 

XOO  15  RD  15  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  6SEP83  EF  27SEP83* 


TO 
TF   -20 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  66  X 
X  X 

X  WALL  INSULATION   X 

■>X  X 

X  X 

X  X 

XOD  5  RD  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  30SEP83*  EF  60CT83* 
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Ixxxxxxxxxxxxxxxxxxxx 

ACT  NO.  9  X 
X 
X 
GRANULAR  FILL  X 
X- 
X 

X  TF 

D  7  RO  7  PCT  OX 
fiXXXXXXXXXXXXXXXXXXX 
t    8FE883    EF  16FEB83 


FROM 
20 


|al 

FDAT 
-14 


UNDERSLAB  ELECTR 
ICALICALICALICAL 


XXXXXXXXXXXXXXXXXXXXXX 

X  ACT  NO.  12    X 

X 

X 

X 

X 

X 

XOD      7  RD      7  PCT 

XXXXXXXXXXXXXXXXXXXXXX 

ES  17FEB83  EF  28FEB83 


X 
X 
X- 
X 
X 
OX 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  22  X 
X  X 

X  CONCRETE  SLAB  ON  X 

>X   GRADE         X 

TO    X  X 

TF   -20  X  X 

XOO  5  RD  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  9MAR83  EF  15HAR83 
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iXXXXXXXXXXXXXXXXXXX 
CT  NO.      56  X 

X 

X 

tWALL  INSULATION      X 

X ) 

X      FROM 
X  TF      -20 
5  RD      5  POT    OX 

XXXXXXXXXXXXXXXXXXX 

30SEP83*  EF  60CT83* 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  70  X 
X  X 

X  SHEETROCK  WALLS  X 
X  X- 

X  X 

X  X 

XOO  25  RO  25  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  70CT83  EF  10NOV83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  72  X 
X  X 

X  TAPE  AND  BED     X 
->X  X- 

X  X 

X  X 

XOO  20  RO  20  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  11NOV83  EF  9DEC83 


XXXXXXXXXXXXXXXXXXXXXX 

X  ACT  NO.      76  X 

X  X 

F   5  X  FUR  DOWN  FOR  CEI  X 

>X  LING  AIR  CONDITI  X- 

X  ONER  X 

X  X 

XOO  5  RO  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  120EC83  EF  )60EC83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  78  X 
X  X 

X  A/C  ROUGH  IN     X 
->X  X- 

X  X 

X  X 

XOD  10  RO  10  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  19DEC83  EF  3JAN84 


XXXXXXXXXXXXXXXXXXXXXX 

X  ACT  NO.      80  X 

X  X 

tAL   X  SHEETROCK  FUR  DO  X 

lAT   X  WNS  X- 

13   X  X 

X  X 

XOO   4  RO   4  PCT  OX 

XXXXXXXXXXXXXXXXXXXXXX 

ES  4JAN84  EF  9JAN84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  95  X 
X  X 

M      X  PAINTING       X 
»T   X  X- 

13   X  X 

X  X 

XOD  20  RD  20  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  2MAR84  EF  29MAR84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  87  X 
X  X 

X  TAPE  AND  BED  FUR  X 
->X   DOWNS         X- 
X  X 

X  X 

XOD  15  RD  15  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  10JAN84  EF  30JAN84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  89  X 
X  X 

X  TEXTURE  WALLS  AN  X 
->X  D  CEILINGS      X- 
X  X 

X  X 

XOD  13  RO  13  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  31JAN84  EF  16FEB84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  100  X 
X  X 

X  VINYL  WALL  COVER  X 
->X  ING        ■   X- 
X  X 

X  X 

XOD  8  RO  8  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  30MAR84  EF  10APR84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  107  X 
X  X 

X  CLEAN  UP       X 
->X  X- 

X  X 

X  X 

XOD  5  RD  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  11APR84  EF  17APR84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  93  X 
X  X 

X  DOORS  AND  TRIM   X 
->X  X- 

X  X 

X  X 

XOO  10  RO  10  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  17FE884  EF  1HAR84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  109  X 
X  X 

X  RESILIENT  FLOORI  X 
->X  NG  AND  BASES     X- 
X  X 

X  X 

XOD  10  RD  10  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  18APR84  EF  1MAY84 
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xxxxxxxxxxxxxxxxxxxxxx 

X  ACT  NO.  115  X 
X  X 

\l      X  INSTALL  CABINETS  X 
IT   X  X- 

X  X 

X  X 

XOD  13  RD  13  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  2MAY84  EF  18MAY84* 


TO 


TF 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  117  X 
X  X 

X  SET  APPLIANCES   X 

-~>X  X 

X  X 

8  X  X 

XOD  5  RD  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  21HAY84  EF  25HAY84» 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  118  X 
X  X 

X  PLUMBING  CONNECT  X 


TO 

— >X 
X 

IONS  AND  TRIHOUT 

X 
X 

TF 

-3  X 

X 

XOC 

)  13  RO 

13  PCT 

OX 

XXXXXXXXXXXXXXXXXXXXXX 

ES 
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xxxxxxxxxxxxxxxxxx 

H   NO.       9  X 

X 

X 
^ANULAR  FILL    X 

•  X   FROM 
X  TF   -20 
D  7  RO   7  PCT  OX 
X(XXXXXXXXXXXXXXXXX 
)FEB83  EF  16FEB83 


I 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  11  X 
X  X 

X  UNDERSLA8  AC  FRE  X 
X  ON  SON  SON  SON  S  X- 
X  X 

X  X 

XOD  5  RD  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  17FE883  EF  24FEB83 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  22  X 
X  X 

X  CONCRETE  SLAB  ON  X 


>X   GRADE 

X 

TO    X 

X 

TF   -20  X 

X 

XOD   5  RD 

5  PCT  OX 

XXXXXXXXXXXXXXXXXXXXXX 

ES  9HAR83 

EF  15HAR83 
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T  NO.  89  X 
X 
X 

X 

X   FROM 
X  TF   -13 
13  RO  13  POT  OX 

XXXXXXXXXXXXXXXXXX 

1JAN84  EF  16FEB84 


EXTURE  WALLS  AN 
CEILINGS 


I 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  91  X 
X  X 

X  BATHROOM  TILE  X 
X  X- 

X  X 

X  X 

XOD  5  RO  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  17FEB84  EF  23FEB84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  95  X 
X  X 

X  PAINTING        X 


TO 

.... 

->X 

X 

X 
X 

TF 

- 

■13 

X 

X 

XOD 

20  RD 

20  PCT  OX 

XXXXXXXXXXXXXXXXXXXXXX 

ES 

2MAR84 
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NO.      115  X 

X 

X 

STALL  CABINETS  X 

X   FROM 
X  TF   -13 

13  RD  13  PCT  OX 

<XXXXXXXXXXXXXXXX 

mU     EF  18MAY84* 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  118  X 
X  X 

X  PLUMBING  CONNECT  X 
X  IONS IONS IONS  IONS  X-- 
X  X 

X  X 

XOD  13  RD  13  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  21MAY84  EF  6JUN84* 


--> 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  123  X 
X  X 

X  BATHROOM  ACCESSO  X 


>X  RIES 

X 

TO    X 

X 

TF    0  X 

X 

XOD   5  RD 

5  PCT  OX 

XXXXXXXXXXXXXXXXXXXXXX 

ES  7JUN84 

EF  13JUN84* 
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(XXXXXXXXXXXXXXXX 
NO.      118  X 

X 

X 

X 

X   FROM 
X  TF   -3 
3  RD  13  PCT  OX 

;xxxxxxxxxxxxxxxx 

AY84  £F  6JUN84* 


JHBING  CONNECT 
IS  AND  TRIHOUT 


xxxxxxxxxxxxxxxxxxxxxx 

XXXXXXXXXXXXXXXXXXXXXX 

X  ACT  NO. 

123  X 

X  ACT  NO. 

128  X 

x 

x 

X 

X 

X  BATHROOM  ACCESSO  X 

X  CLEAN  UP 

X 

X  RIES 

X 

— >X 

X 

x 

X 

X 

X 

x 

X 

X 

X 

XOD   5  RD 

5  PCT  OX 

XOD  10  RD 

10 

PCT  OX 

xxxxxxxxxxxxxxxxxxxxxx 

XXXXXXXXXXXXXXXXXXXXXX 

ES  7JUN84 

EF  13JUN84 

ES  14JUN84 

EF 

27JUN84 

XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  136  X 
X  X 

X  PAINT  TOUCH  UP   X 
->X  X- 

X  X 

X  X 

XOD  5  RD  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  28JUN84  EF  5JUL84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  138  X 
X  X 

X  INSTALL  CARPETIN  X 
->X  G  X- 

X  X 

X  X 

XOD  15  RD  15  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  6JUL84  EF  26JUL84 


XXXXXXXXXXXXXXXXXXXXXX 

XXXXXXXXXXXXXXXXXXXXXX 

X  ACT  NO.      140  X 

X  ACT  NO. 

142  X 

X               X 

X 

X 

X  INSTALL  DRAPES   X 

X  CLEAN  UP 

X 

X               X 

— >X 

X 

X               X 

X 

X 

X               X 

X 

X 

XOD   5  RD   5  PCT  OX 

XOD  10  RD 

10 

PCT  OX 

XXXXXXXXXXXXXXXXXXXXXX 

XXXXXXXXXXXXXXXXXXXXXX 

ES  27JUL84  EF  2AU684 

ES  3AUG84 

EF 

16AUG84 

XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  144  X 
X  X 

X  PUNCH  LIST      X 
->X  X- 

X  X 

X  X 

XOD  10  RD  10  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  17AU684  EF  30AUG84 


XXXXXXXXXXXXXXXXXXXXXX 
X  ACT  NO.  146  X 
X  X 

X  BUILDING  COMPLET  X 
->X  E  X- 

X  X 

X  X 

XOD  5  RD  5  PCT  OX 
XXXXXXXXXXXXXXXXXXXXXX 
ES  31AUG84  EF  6SEP84 


NO  SUCCESSORS 


-  SORTING  CRITERIA 


ES  TF 


ACTIVITIES  SORTED  =   58 
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CoflMDunity  Developers,  Inc.         PRIHAVERA  PROJECT  PLANNER 

^TE  23HAY87  RUN  NO.   15  PROJECT  SCHEDULE 

}d  Rep  (with  log)  -  Sorted  by  ES,  TF 


Multi  Family  Housing  Project 

START  DATE  130EC82  FIN  DATE  6SEP84 

DATA  DATE  1FEB83   PAGE  NO.    1 


[TY   GRIG  REM 

•R   DUR  DUR  POT 


ACTIVITY  DESCRIPTION 


CODE 


EARLY   EARLY    LATE    LATE   TOTAL 
START   FINISH   START   FINISH  FLOAT 


1 


5   0  100 


3  15  0  100 

5  8  3  62 

7  5  2  60 

9  7  7  0 

13  13  13  0 

12  7  7  0 

11  5  5  0 

22  5  5  0 

24  13  13  0 

26  10  10  0 

I  27  6  6  0 

30  50  50  0 

50  20  20  0 

52  4  4  0 

53  15  15  0 

54  8  8  0 
32  23  23  0 

I 

34  20  20  0 

5  5  0 

I  4  1  62 

58  15  15  0 


LAYOUT 


SOIL  STABILIZATION 


PLUMBING-STREET  CONNECTION  AND  UNDERSLA6 


FOUNDATION  EXCAVATION 


14DEC82A  22DEC82A 


280EC82A  20JAN83A 


24JAN83A  3FEB83 


6JAN83   -20 


GRANULAR  FILL 


TERMITE  PROTECTION 


UNDERSUB  ELECTRICAL  LINE 


UNDERSUB  AC  FREON  SiR  LINE 


CONCRETE  SLAB  ON  GRADE 


CURING  TIME 


SET  PRECAST  CONCRETE  PANELS 


GROUT  PRECAST  PANELS 


INSTALL  METAL  STAIRS 


FRAME  INTERIOR  WALLS 


INSTALL  TUB,  STACK  OUT  PLUMBING 


4FEB83   7FEB83   7JAN83  10JAN83    -20 


8FEB83  16FEB83  11JAN83  19JAN83   -20 


17FEB83   8MAR83  20JAN83   7FEB83    -20 


17FEB83  28FEB83  28JAN83   7FEB83   -14 


17FEB83  24FEB83   1FEB83   7FEB83   -12 


9MAR83  15MAR83   8FEB83  14FEB83 


4APR83  15APR83   7MAR83  18HAR83 


19APR83  16MAY83   8JUL83   4AUG83 


17MAY83  20MAY83   5AUG83  10AUG83 


PULL  WIRE  &  ROUGH  IN  ELECTRIC&TELEPHONE  IN  WALLS  17MAY83   7JUN83  11AUG83  31AUG83 


TV  WIRE  PULLING 

PLATES,  LINTELS,  AND  ROOF  TRUSSES 

REDWOOD  FASCIA, SOFFIT  AND  PLYWOOD  DECKING 

DRY  SHEETING 

STOCK  BULK  MATERIAL  INSIDE  BUILDING 

ROOF  SHINGLES 


17MAY83  26MAY83  22AUG83  31AUG83 


29JUN83   1AUG83   1JUN83   1JUL83 


6SEP83   6SEP83   9AUG83   9AUG83 


-20 


16MAR83   1APR83  15FEB83   4MAR83    -20 


-20 


11APR83  18APR83  14MAR83  21MAR83    -20 


19APR83  28JUN83  22MAR83  31HAY83   -20 


56 


56 


60 


67 


-20 


2AUG83  29AUG83   5JUL83   1AUG83   -20 


30AUG83   5SEP83   2AUG83   8AU683    -20 


-20 


6SEP83  27SEP83  11AUG83  31AUG83*   -18 
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ommunity  Oeve Topers,  Inc. 
E  23MAY87  RUN  NO.   16 
Rep  (with  log)  -  Sorted  by  ES,  TF 


PRIHAVERA  PROJECT  PLANNER 
PROJECT  SCHEDULE 


Hulti  Family  Housing  Project 

START  DATE  13DEC82  FIN  DATE  6SEP84 

DATA  DATE  1FEB83   PAGE  NO.    2 


Y   GRIG  REM 

OUR  DUR  PCT 

45    3   3  0 

47    5   5  0 

49    8    8  0 

>6    5   5  0 


17    5  5  0 

i8    6  6  0 

0   25  25  0 

2   20  20  0 

5  5  0 

10  10  0 

8   10  10  0 

4  4  0 
•7   15  15  0 

13  13  0 

10  10  0 

5  5  0 
20  20  0 

a  8  0 

5  5  0 

5  5  0 

10  10  0 


ACTIVITY  DESCRIPTION 


CODE 


EARLY   EARLY    LATE    LATE   TOTAL 
START   FINISH   START   FINISH  FLOAT 


SET  INFILL  PANEL  FRAMING 

WINDOWS 

WOOD  SIDING 

WALL  INSULATION 

Sub  -  Contractor:  Jones  Corp. 

Drawing  No.  64512 

CONCRETE  STAIRS 

EXTERIOR  RAILINGS 

SHEETROCK  WALLS 

TAPE  AND  BED 

FUR  DOWN  FOR  CEILING  AIR  CONDITIONER 

BLOW  ON  CEILING  INSULATION 

A/C  ROUGH  IN 

SHEETROCK  FUR  DOWNS 

TAPE  AND  BED  FUR  DOWNS 

TEXTURE  WALLS  AND  CEILINGS 

DOORS  AND  TRIM 

BATHROOM  TILE 

PAINTING 

VINYL  WALL  COVERING 

HARDWARE 

CLEAN  UP 

RESILIENT  FLOORING  AND  BASES 

94 


7SEP83   9SEP83  10AUG83  12AUG83   -20 


13SEP83  19SEP83  15AUG83  19AUG83   -20 


20SEP83  29SEP83  22AUG83  31AUG83   -20 


30SEP83*  60CT83   1SEP83*  7SEP83   -20 


40CT83  100CT83  7JUN84  13JUN84  174 

50CT83  120CT83  6JUN84  13JUN84  172 

70CT83  10NOV83  20SEP83  240CT83  -13 

11NOV83  9DEC83  250CT83  21N0V83  -13 

12DEC83  16DEC83  22NOV83  29N0V83  -13 

12DEC83  230EC83  31HAY84  13JUN84  121 

19DEC83  3JAN84  30NOV83  13DEC83  -13 

4JAN84  9JAN84  14DEC83  19DEC83  -13 

10JAN84  30JAN84  20DEC83  11JAN84  -13 

31JAN84  16FEB84  12JAN84  30JAN84  -13 

17FEB84  1MAR84  31JAN84  13FEB84  -13 

17FEB84  23FEB84  7FE884  13FEB84  -8 

2MAR84  29HAR84  14FEB84  12MAR84  -13 

30MAR84  10APR84  13MAR84  22MAR84  -13 

30MAR84  5APR84  7JUN84  13JUN84  49 

11APR84  17APR84  23MAR84  29MAR84  -13 

18APR84  1MAY84  30MAR84  12APR84  -13 


omtnunity  Developers,  Inc. 
E  23MAY87  RUN  NO.   16 
Rep  (with  log)  -  Sorted  by  ES,  TF 


PRIHAVERA  PROJECT  PLANNER 
PROJECT  SCHEDULE 


Hulti  Family  Housing  Project 

START  DATE  130EC82  FIN  DATE  6SEP84 

DATA  DATE  1FEB83   PAGE  NO.    3 


f   ORIG  REM 

DUR  OUR  PCT 

15  13  13  0 

12  14  14  0 

13  10  10  0 
U    5  5  0 

9   12  12  0 

8   13  13  0 

7  5  5  0 
3    5  5  0 

8  10  10  0 

16  5  5  0 
15  15  0 

5  5  0 

10  10  0 

10  10  0 

5  5  0 


CODE 


ACTIVITY  DESCRIPTION 

INSTALL  CABINETS 

PANELING,  FINISH  CARPENTRY  AND  HILLWORK 

INSTALL  CONDENSERS  AND  A/C  TRIHOUT 

TV  TRIMOUT 

ELECTRICAL  CONNECTIONS  AND  TRIMOUT 

PLUMBING  CONNECTIONS  AND  TRIHOUT 

SET  APPLIANCES 

BATHROOM  ACCESSORIES 

CLEAN  UP 

PAINT  TOUCH  UP 

INSTALL  CARPETING 

INSTALL  DRAPES 

CLEAN  UP 

PUNCH  LIST 

BUILDING  COMPLETE 


EARLY  EARLY    LATE  LATE  TOTAL 

START  FINISH   START  FINISH  FLOAT 

2HAY84  18MAY84  13APR84*  1MAY84  -13 

2MAY84  21MAY84  25MAY84  13JUN84  17 

2MAY84  15MAY84  31MAY84  13JUN84  21 

2MAY84  8HAY84   7JUN84  13JUN84  26 

17MAY84  1JUN84  29MAY84  13JUN84  8 

21MAY84  6JUN84  16MAY84  1JUN84*  -3 

21MAY84  25MAY84  31MAY84  6JUN84  8 

7JUN84  13JUN84   7JUN84  13JUN84  0 

14JUN84  27JUN84  14JUN84  27JUN84  0 

28JUN84  5JUL84  28JUN84  5JUL84  0 

6JUL84  26JUL84  6JUL84  25JUL84  0 

27JUL84  2AUG84  27JUL84  2AUG84  0 

3AUG84  16AUG84  3AUG84  16AUG84  0 

17AUG84  30AUG84  17AUG84  30AUG84  0 

31AU684  6SEP84  31AUG84  6SEP84  0 


95 


Page 


RD   PCT  DESCRIPTION 


EARLY 
START 


EARLY 
FINISH 


TF 


1 

0 

100 

3 

0 

100 

5 

3 

62 

7 

2 

60 

9 

7 

0 

11 

5 

0 

12 

7 

0 

13 

13 

0 

22 

5 

0 

24 

13 

0 

26 

10 

0 

27 

6 

0 

30 

50 

0 

32 

23 

0 

34 

20 

0 

41 

5 

0 

43 

1 

62 

45 

3 

0 

47 

5 

0 

49 

8 

0 

50 

20 

0 

52 

4 

0 

53 

15 

0 

54 

8 

0 

58 

15 

0 

66 

5 

0 

67 

5 

0 

68 

6 

0 

70 

25 

0 

72 

20 

0 

74 

10 

0 

76 

5 

0 

78 

10 

0 

80 

4 

0 

87 

15 

0 

89 

13 

0 

91 

5 

0 

93 

10 

0 

95 

20 

0 

99 

5 

0 

100 

8 

0 

107 

5 

0 

109 

10 

0 

112 

14 

0 

113 

10 

0 

114 

5 

0 

115 

13 

0 

117 

5 

0 

118 

13 

0 

119 

12 

0 

LAYOUT  14DEC82A  22DEC82A 

SOIL  STABILIZATION  28DEC82A  20JAN83A 

PLUMBING-STREET  CONNECTION  AND  UNDERS  24JAN83A   3FEB83  -20 

FOUNDATION  EXCAVATION  4FEB83    7FEB83  -20 

GRANULAR  FILL  8FEB83  16FEB83  -20 

UNDERSLAB  AC  FREON  S&R  LINE  17FEB83  24FEB83  -12 

UNDERSLAB  ELECTRICAL  LINE  17FEB83  28FEB83  -14 

TERMITE  PROTECTION  17FEB83    8MAR83  -20 

CONCRETE  SLAB  ON  GRADE  9MAR83  15MAR83  -20 

CURING  TIME  16MAR83    1APR83  -20 

SET  PRECAST  CONCRETE  PANELS  4APR83  15APR83  -20 

GROUT  PRECAST  PANELS  11APR83  18APR83  -20 

INSTALL  METAL  STAIRS  19APR83  28JUN83  -20 

PLATES,  LINTELS,  AND  ROOF  TRUSSES  29JUN83    1AUG83  -20 

REDWOOD  FASCIA, SOFFIT  AND  PLYWOOD  DEC   2AUG83  29AUG83  -20 

DRY  SHEETING  30AUG83    5SEP83  -20 

STOCK  BULK  MATERIAL  INSIDE  BUILDING  6SEP83    6SEP83  -20 

SET  INFILL  PANEL  FRAMING  7SEP83    9SEP83  -20 

WINDOWS  13SEP83  19SEP83  -20 

WOOD  SIDING  20SEP83  29SEP83  -20 

FRAME  INTERIOR  WALLS  19APR83  16MAY83  56 

INSTALL  TUB,  STACK  OUT  PLUMBING  17MAY83  20MAY83  56 

PULL  WIRE  &  ROUGH  IN  ELECTR I C&TELEPHO  17MAY83    7JUN83  60 

TV  WIRE  PULLING  17MAy83  26MAY83  67 

ROOF  SHINGLES  6SEP83  27SEP83  -18 

WALL  INSULATION  30SEP83    60CT83  -20 

CONCRETE  STAIRS  40CT83  100CT83  174 

EXTERIOR  RAILINGS  50CT83  120CT83  172 

SHEETROCK  WALLS  70CT83  10N0V83  -13 

TAPE  AND  BED  11N0V83    9DEC83  -13 

BLOW  ON  CEILING  INSULATION  12DEC83  23DEC83  121 

FUR  DOWN  FOR  CEILING  AIR  CONDITIONER   12DEC83  16DEC83  -13 

A/C  ROUGH  IN  19DEC83    3JAN84  -13 

SHEETROCK  FUR  DOWNS  4JAN84    9JAN84  -13 

TAPE  AND  BED  FUR  DOWNS  10JAN84  30JAN84  -13 

TEXTURE  WALLS  AND  CEILINGS  31JAN84  16FEB84  -13 

BATHROOM  TILE  17FEB84  23FEB84  -8 

DOORS  AND  TRIM  17FEB84    1MAR84  -13 

PAINTING  2MAR84  29MAR84  -13 

HARDWARE  30MAR84    5APR84  49 

VINYL  WALL  COVERING           «  30MAR84  10APR84  -13 

CLEAN  UP  11APR84  17APR84  -13 

RESILIENT  FLOORING  AND  BASES  18APR84    1MAY84  -13 

PANELING,  FINISH  CARPENTRY  AND  MILLWO   2MAY84  21MAY84  17 

INSTALL  CONDENSERS  AND  A/C  TRIMOUT  2MAY84  15MAY84  21 

TV  TRIMOUT  2MAY84    8MAY84  26 

INSTALL  CABINETS  2MAY84  18MAY84  -13 

SET  APPLIANCES  21MAY84  25MAY84  8 

PLUMBING  CONNECTIONS  AND  TRIMOUT  21MAY84    6JUN84  -3 

ELECTRICAL  CONNECTIONS  AND  TRIMOUT  17MAY84    1JUN84  8 
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Page 


rVITY   RD   PCT  DESCRIPTION 


EARLY 
START 


EARLY 
FINISH 


TF 


123 

5 

0 

128 

10 

0 

136 

5 

0 

138 

15 

0 

140 

5 

0 

142 

10 

0 

144 

10 

0 

146 

5 

0 

BATHROOM  ACCESSORIES 
CLEAN  UP 
PAINT  TOUCH  UP 
INSTALL  CARPETING 
INSTALL  DRAPES 
CLEAN  UP 
PUNCH  LIST 
BUILDING  COMPLETE 


7JUN84 
14JUN84 
28JUN84 

6JUL84 
27JUL84 

3AUG84 
17AUG84 
31AUG84 


13JUN84 
27JUN84 

5JUL84 
26JUL84 

2AUG84 
16AUG84 
30AUG84 

6SEP84 


0 
0 
0 
0 
0 
0 
0 
0 
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Page: 


1-  1 


TY  DESCRIPTION 


03   07  07  04  02   06  04  01   05  03   07  05  02   06  05  02   07  04  02   06  03  01   05 
JAN  FEB  MAR  APR  HAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  JAN  FEB  HAR  APR  MAY  JUN  JUL  AUG  SEP  OCT  NOV 
83   83  83  83  83   83  83  83   83  83   83  83  84   84  84  84   84  84  84   84  84  84   84 


1  LAYOUT 

3  SOIL  STABILIZATION 

5  PLUMBING-STREET  CON 

7  FOUNDATION  EXCAVATI 
9  GRANUUR  FILL 

11  UNDERSLAB  AC  FREON 

12  UNDERSLAB  ELECTRICA 

13  TERMITE  PROTECTION 
22  CONCRETE  SLAB  ON  GR 
24  CURING  TIME 

26  SET  PRECAST  CONCRET 

27  GROUT  PRECAST  PANEL 
30  INSTALL  METAL  STAIR 
32  PLATES.  LINTELS,  AN 
34  REDWOOD  FASCIA, SOFF 
n  DRY  SHEETING 

J3  STOCK  BULK  MATERIAL 

15  SET  INFILL  PANEL  FR 

17  WINDOWS 

(9  WOOD  SIDING 

0  FRAME  INTERIOR  WALL 

2  INSTALL  TUB,  STACK 

3  PULL  WIRE  &  ROUGH  I 

4  TV  WIRE  PULLING 

8  ROOF  SHINGLES 

6  WALL  INSULATION 

7  CONCRETE  STAIRS 

8  EXTERIOR  RAILINGS 
rO  SHEETROCK  WALLS 

2  TAPE  AND  BED 

'4  BLOW  ON  CEILING  INS 

6  FUR  DOWN  FOR  CEIL IN 

8  A/C  ROUGH  IN 

0  SHEETROCK  FUR  DOWNS 
17  TAPE  AND  BED  FUR  00 
i9  TEXTURE  WALLS  AND  C 

1  BATHROOM  TILE 

3  DOORS  AND  TRIM 

5  PAINTING 

9  HARDWARE 

10  VINYL  WALL  COVERING 

7  CLEAN  UP 

9  RESILIENT  FLOORING 

2  PANELING,  FINISH  CA 

3  INSTALL  CONDENSERS 

4  TV  TRIMOUT 

5  INSTALL  CABINETS 

7  SET  APPLIANCES 

8  PLUMBING  CONNECTION 

9  ELECTRICAL  CONNECTI 


AA  .       *. 
AAAA  *. 
L--AE. 
LL~EE 
,LL--EE 
LLEE 
LLLEEE 
LLLLEEEE 
«LL--EE 
«.LLL-EEE 


LL--EE 
LL-EE 
LLLLEEEEEE/EEEE 

LLLL/EEEEE 

LLLL/EEEE 
LL-EE 
.L — £ 
.L--E 
.  L— EE 
.     LL-EE 
EEEEE++++++LLLLL 
E++++++++++LL 
EEEE+++-H-+++LLLL. 
EE++++++++-H-++LL . 

.LLLLEEEE 
LL-EE 


EE+++++++++++++++++++++++++++++++++LL 
EE+++++++++++++++++++++++++++++++++LL 

LLEEE/EE   

LLEE/EE   

. EE++++++++++++++++++++++LLL 

LL-E 

LLLEEE    

•LL-EE   

LLL/EEE 

.LLL/EE  .... 
L/E  .   .    .   . 
LL/EE.   .    .   . 
, LLEE/EE.    .   . 
.  EE++++++++LL 
.LLEEE   .   . 
.  LL-EE  .   . 
.  LLLEEE.   . 
EEE/LLL 
EEE+LLL 
EE+++LL 
.LLL/EE  . 
.  ELL 
.LE/E 
.EE/LL 
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Page:   2-  1 


FY  DESCRIPTION 


03   07  07  04  02   06  04  01   05  03   07  05  02   06  05  02   07  04  02   06  03  01   05 
JAN  FEB  MAR  APR  MAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  JAN  FEB  MAR  APR  HAY  JUN  JUL  AUG  SEP  OCT  NOV 
83   83  83  83  83   83  83  83   83  83   83  83  84   84  84  84   84  84  84   84  84  84   84 


!3  BATHROOM  ACCESSORIE 

!8  CLEAN  UP 

16  PAINT  TOUCH  UP 

18  INSTALL  CARPETING 

0  INSTALL  DRAPES 

2  CLEAN  UP 

4  PUNCH  LIST 

6  BUILDING  COMPLETE 


//  .  . 

III.  . 

II  . 

nil . 

.  //. 

.  Ill 

.  .Ill 

.  .  // 
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?EDURCE  PROFILE  —  «*ALL*»   ««ALL*»  Page: 


20000 * 

« 

« 

* 

» 

15000 * 

« 

.   *.   . E 

.   * E  .    .   .  • 

.   * E 

10000 * E 

.   * E  E 

.   * EEE 

.   * •   .   .    EEEE 

.   * EEEE 

5000 « EEEE 

.   * EEEE 

.   * EEEE.    .   .E 

.   * EEEEE    .   .EE  .    ...    E 

.   *...■.    ...   EEEEEEEEEEE   .EE  E   ...   EEE  

0 AEE.  .EE.  .EEEEEEEEEE EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE.EEEEEEEEEE. .  .EEEEE 

03  07  07  04  02  06  04  01  05  03  07  05  02  06  05  02  07  04  02  06  03  01  05  03  07  04  04  0 
JAN  FEB  MAR  APR  HAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  JAN  FEB  HAR  APR  HAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  JAN  FEB  HAR  A 
83   83  83  83  83   83  83  83   83  83   83  83  84   84  84  84   84  84  84   84  84  84   84  84   85  85  85  8 


SORTING  CRITERIA 

TED  BY  ES  TF 

BER  OF  ACTIVITIES  SORTED  =      58 
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)PEN  PLAN 
lEPORT:  ACTES 
'ROJECT:  AOHOEHO 


TEST  OPEN  PLAN  INCORPORATED 

ACTIVITY  LISTING  by  EARLY  START 

Open  Plan  Demonstration  Network  (ADH) 


PAGE:   1 
REPORT  DATE:23MAY87 
TIME  NOW:05SEP87 


REM  ORIG 
I  ACTIVITY   OUR  OUR   DESCRIPTION 


EARLY 
CODE  1  CODE  2   START 


EARLY 
FINISH 


LATE 
START 


\10 

A20 

3 

MATERIAL  DELIVERY 

uo 

A30 

2 

EXCAVATION 

uo 

A40 

6 

GARDENING  WORK 

uo 

A60 

2 

DRAINAGE  WORK 

^20 

A50 

i 

ROOF  FABRICATION 

^20 

A60 

6 

WALL  FABRICATION 

^20 

A70 

3 

DOORS  AND  WINDOWS 

^20 

A80 

3 

ELECTRICAL  WORK 

UO 

A90 

2 

INSTALL  FENCE 

150 

A60 

0 

DUMMY 

^60 

A70 

5 

ERECTION 

\60 

A80 

2 

PLUMBING  WORK 

170 

A80 

2 

PAINTING 

\M 

A90 

2 

FINISHING 

DEPTA 

GEN 

07SEP87 

DEPTB 

GEN 

07SEP87 

DEPTB 

DECO 

07SEP87 

DEPTB 

UTIL 

07SEP87 

DEPTA 

GEN 

10SEP87 

DEPTA 

GEN 

10SEP87 

DEPTA 

GEN 

10SEP87 

DEPTA 

UTIL 

10SEP87 

DEPTB 

GEN 

15SEP87 

DEPTB 

GEN 

16SEP87 

DEPTB 

GEN 

18SEP87 

DEPTA 

UTIL 

18SEP87 

DEPTB 

DECO 

25SEP87 

DEPTA 

GEN 

29SEP87 

LATE 
FINISH 


09SEP87 

07SEP87 

09SEP87 

08SEP87 

29SEP87 

30SEP87 

USEP87 

21SEP87 

28SEP87 

08SEP87 

16SEP87 

17SEP87 

15SEP87 

14SEP87 

17SEP87 

17SEP87 

10SEP87 

17SEP87 

MSEP87 

22SEP87 

24SEP87 

14SEP87 

24SEP87 

28SEP87 

16SEP87 

29SEP87 

30SEP87 

15SEP87 

18SEP87 

17SEP87 

24SEP87 

18SEP87 

24SEP87 

21SEP87 

25SEP87 

28SEP87 

28SEP87 

25SEP87 

28SEP87 

30SEP87 

29SEP87 

3QSEP87 

TOTAL 
FLOAT 


0 

16 
10 
7 
2 
0 
8 

10 
10 
2 
0 
5 
0 
0 
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OPEN  PLAN 
REPORT:  BARBASE 
PROJECT:  ADHDEMO 


TEST  OPEN  PLAN  INCORPORATED 

CURRENT  PLAN  vs  BASELINE  BARCHART  by  EARLY  START 

Open  Plan  Demonstration  Network  (ADM) 


PAGE:   1 
REPORT  DATE:23MAY87 
TIME  NOW:05SEP87 


REM  ORIG 
ACTIVITY    DUR  OUR   DESCRIPTION 


05 

SEP 

87 


12 

SEP 

87 


19 

SEP 

87 


26 

SEP 

87 


03 

OCT 

87 


10 

OCT 

87 


17 

OCT 

87 


24 

OCT 
87 


31 

OCT 

87 


07 

NOV 

87 


I     I 


——  —  —  ■-  —  —  —  —  —  —  —  ———  —  —  ■-  —  -■-■  —  ■-  —  —  ———————  —  —  —  —  -■-  — —  !••-•--■  —  —  ■-■-■—  —  —  —  --  —  -----"•-■-  —  ■■  —  —  —  "■  —  —■■•■-•"  —  "•"■-■-■"  —  "■■-  —  —  ———  —  —  —  —  —  —  —  ■--  —  —  "-——  —  —  —  —  —  —  —  —  —  —  —  —  —  —  —  —  —  —  -■  —  ■-  —  ■-  —  —  ——"— — 

A10   A20      3   3  MATERIAL  DELIVERY                 *  CCC  |     |     |     |     |     |     |     |     | 

*  i     1     1     1     1     1     1     1     1 

A10   A30      2    2  EXCAVATION                      *XX...HH HH HH...  {     |     |     |     |     | 

A10   A40      6   6  GARDENING  WORK                   *  XXXXXHHX. . . .HH HH.    1     1     I     I     I     I 

*  1     1     1     1     1     1     1     1     1 

AID   A60      2    2  DRAINAGE  WORK                    *XX...HH....  |     |     |     |     |     |     |     | 

1     1     1     1     1     1     1     1     1 

A20   A50     4   4  ROOF  FABRICATION                  *   XXHHXX..  |     |     |     |     |     |     {     | 

1     1     1     1     1     1     1     1     1 

A20   A60      6    6  WALL  FABRICATION  .                «   CCHHCCCC  |     {     |     |     |     |     |     | 

A20   A70      3   3  DOORS  AND  WINDOWS                 *   XXHHX. . . .HH. . . .  |     |     |     |     |     |     | 

A20   A80      3    3  ELECTRICAL  WORK                   *   XXHHX. ...HH HH.    1     1     1     I     I     | 

A40   A90      2   2  INSTALL  FENCE                    *     |  XX. .HH HH...  |     {     |     {     |     { 

1     1     1     1     1     1     1     1     1 

A60   A70      5    5  ERECTION                        «     |    CHHCCCC  |     |     |     |     |     |     | 

*     1     1     1     1     1     1     1     1     1 

ABO   A80      2   2  PLUMBING  WORK                    *            |    XHHX....HH.    1     1     I     |     |     j 

A70   A80      2   2  PAINTING                        *     |     |    CHHC    1     1     1     I     |     | 

•  1     1     1     1     1     1     1     1     1 

A80   A90      2   2  FINISHING                       *     1     1     1  CC  |     |     |     |     |     | 

*  1     1     1     1     1     1     1     1     1 

BAR  CHART  KEY: 

A:  Actual 

C:  Critical 

H:  Holiday 

P:  In  Progress 

X:  Planned 

.:  Float 

B:  Baseline 

Note:  All  characters  represent   1  time  units. 
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Project  :  ADMDEMO 


Description  :  Open  Plan  Demonstration  Network  (ADM) 


Activity       05       12       19      26       03       10       17       24       31       07 
SEP     SEP     SEP     SEP     OCT     OCT     OCT     OCT     OCT     NOV 
87       87       87      87       87       87       87       87       87       87 


A10 
A10 
A10 
A10 
A20 
A20 
A20 
A20 
A40 
A60 
A60 
A70 
A80 


A20 

A30 
A40 
A60 
ABO 
A60 
A70 
A80 
A90 
A70 
ABO 
A80 
A90 


Time    Now 


* 

* 
* 

* 


nniuuiiiiii 


Bniininnn 


Bar    Chart    Key 


is  Float,  ,,,,,,is  Critical 


=  is  Planned,  A  is  Actual, 

P  is  In  Progress  (all  characters  represent   1  time  units) 


m 
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OPEN  PLAN 
REPORT:  ACTSS 
PROJECT:  AOMDEMO 


TEST  OPEN  PLAN  INCORPORATED 

SCHEDULED  START  ACTIVITY  LISTING  by  SCHEDULED  START 

Open  Plan  Demonstration  Network  (AOH) 


REM  GRIG 

ACTIVITY   DUR  DUR   DESCRIPTION 


SCHEDULED 
CODE  1  CODE  2   START 


SCHEDULED 
FINISH 


PAGE:   1 

REPORT  DATE:  23MAY87 

TIME  NOW:  05SEP87 

LATE       UTE       TOTAL 
START      FINISH     FLOAT 


A10 

A20 

3 

3 

MATERIAL  DELIVERY 

DEPTA 

GEN 

07SEP87 

09SEP87 

07SEP87 

09SEP87 

0 

A10 

A60 

2 

2 

DRAINAGE  WORK 

OEPTB 

UTIL 

07SEP87 

08SEP87 

16SEP87 

17SEP87 

7 

A20 

A50 

4 

4 

ROOF  FABRICATION 

DEPTA 

GEN 

10SEP87 

15SEP87 

14SEP87 

17SEP87 

2 

A20 

A60 

6 

6 

WALL  FABRICATION 

DEPTA 

GEN 

10SEP87 

17SEP87 

10SEP87 

17SEP87 

0 

A20 

A70 

3 

3 

DOORS  AND  WINDOWS 

DEPTA 

GEN 

10SEP87 

14SEP87 

22SEP87 

24SEP87 

8 

A20 

A80 

3 

3 

ELECTRICAL  WORK 

DEPTA 

UTIL 

15SEP87 

17SEP87 

24SEP87 

28SEP87 

10 

A50 

A60 

0 

0 

DUMMY 

OEPTB 

GEN 

16SEP87 

15SEP87 

18SEP87 

17SEP87 

2 

A60 

A70 

5 

5 

ERECTION 

DEPT8 

GEN 

18SEP87 

24SEP87 

18SEP87 

24SEP87 

0 

A60 

A80 

2 

2 

PLUMBING  WORK 

DEPTA 

UTIL 

18SEP87 

21SEP87 

25SEP87 

28SEP87 

5 

A10 

A40 

6 

6 

GARDENING  WORK 

DEPTB 

DECO 

22SEP87 

29SEP87 

21SEP87 

28SEP87 

10 

A70 

A80 

2 

2 

PAINTING 

DEPTB 

DECO 

25SEP87 

28SEP87 

25SEP87 

28SEP87 

0 

A80 

A90 

2 

2 

FINISHING 

DEPTA 

GEN 

29SEP87 

30SEP87 

29SEP87 

30SEP87 

0 

A40 

A90 

2 

2 

INSTALL  FENCE 

DEPTB 

GEN 

30SEP87 

01OCT87 

29SEP87 

30SEP87 

10 

A10 

A30 

2 

2 

EXCAVATION 

OEPTB 

GEN 

01OCT87 

02OCT87 

29SEP87 

30SEP87 

16 
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Report  GRAFRES   on  Project  PDMDEMO  :  Open  Plan  Demonstration  Network  (PDM) 
RESOURCE  HISTOGRAM  on  Early  Dates  for  Resource  A   :  RESOURCE  A 
37.5- 


25.  0 


12.  5 


.0 


■■■II    iiiii 


iiii^    iiiii 


22 

29 

06 

B 
13 

11 
20 

27 

II 
03 

il 
10 

17 

a 
24 

11 
01 

SEP 

SEP 

OCT 

OCT 

OCT 

OCT 

NOV 

NOV 

NOV 

NOV 

DEC 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

Report  GRAFRES   on  Project  PDMDEMO  :  Open  Plan  Demonstration  Network  (PDM) 
RESOURCE  HISTOGRAM  on  Scheduled  Dates  for  Resource  A   :  RESOURCE  A 


15- 


10- 


5-1 


0 


1  ■  ■  ■  ■    I  11  1 

IM  I   11 

■  ■    ■  1  ■ 

1  1 

II   1 1  ■  ■  ■ 

i 

\     Ml     1 

i    1 

8 

1 

1       I 

!    isi 

M         ( 
1 

!  1 

Mil 

1     1 

1 

! 

ill    1    III 

Il   1 11 

11    illlil 

III    ■■■■I    IIIII    ■■■ 


II 

22 

11 
29 

11 
06 

13 

II 
20 

1 
27 

11 
03 

!1 
10 

li 
17 

! 
24 

1 
01 

SEP 

SEP 

OCT 

OCT 

OCT 

OCT 

NOV 

NOV 

NOV 

NOV 

DEC 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 
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REPORT:  ACTES 
PROJECT:  PDHDEHO 


ACTIVITY 


REM  ORIG 

DUR  OUR   DESCRIPTION 


TEST  OPEN  PLAN  INCORPORATED 

ACTIVITY  LISTING  by  EARLY  START 

Open  Plan  Demonstration  Network  (PDH) 


EARLY 
CODE  1  CODE  2   START 


EARLY 
FINISH 


PAGE:   1 


REPORT  0ATE:23HAY87 


TIME  NOW:22SEP87 


LATE 
START 


LATE 
FINISH 


TOTAL 
FLOAT 


P300 

2 

DRAINAGE  WORK 

DEPTB 

UTIL 

22SEP87 

23SEP87 

01OCT87 

02OCT87 

P200 

2 

EXCAVATION 

DEPT8 

GEN 

22SEP87 

23SEP87 

24SEP87 

25SEP87 

P400 

6 

GARDENING  WORK 

DEPTB 

DECO 

22SEP87 

29SEP87 

06OCT87 

130CT87 

10 

P100 

3 

MATERIAL  DELIVERY 

DEPTA 

GEN 

22SEP87 

24SEP87 

22SEP87 

24SEP87 

P700 

5 

FOUNDATION 

DEPTB 

GEN 

24SEP87 

30SEP87 

28SEP87 

02OCT87 

P800 

3 

DOORS  &  WINDOWS 

DEPTB 

GEN 

25SEP87 

29SEP87 

070CT87 

09OCT87 

P500 

4 

ROOF  FABRICATION 

DEPTA 

GEN 

25SEP87 

30SEP87 

29SEP87 

020CT87 

PllOO 

3 

ELECTRICAL  WORK 

DEPTA 

UTIL 

25SEP87 

29SEP87 

09OCT87 

130CT87 

10 

P500 

6 

WALL  FABRICATION 

DEPTA 

GEN 

25SEP87 

02OCT87 

25SEP87 

02OCT87 

P1300 

2 

INSTALL  FENCE  &  POSTS 

DEPTB 

GEN 

30SEP87 

01OCT87 

140CT87 

150CT87 

10 

P900 

5 

ERECTION 

DEPTB 

GEN 

05OCT87 

09OCT87 

05OCT87 

09OCT87 

P1000 

2 

PLUMBING  WORK 

DEPTA 

UTIL 

05OCT87 

06OCT87 

120CT87 

130CT87 

P1200 

2 

PAINTING 

DEPTB 

DECO 

120CT87 

130CT87 

120CT87 

130CT87 

0 

P1400 

2 

DO  FINISHING 

DEPTA 

GEN 

140CT87 

150CT87 

140CT87 

150CT87 

0 
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OPEN  PLAN 
REPORT:  8ARBASE 
PROJECT:  POMOEMO 


REM  ORIG 
ACTIVITY    DUR  DUR   DESCRIPTION 


TEST  OPEN  PLAN  INCORPORATED 

CURRENT  PLAN  vs  BASELINE  BARCHART  by  EARLY  START 

Open  Plan  Oeraonstpatlon  Network  (POM) 

22    29    06  13 

SEP   SEP   OCT  OCT 

87    87    87  87 

I     I     I  I 


PAGE:   1 


REPORT  DATE:23HAY87 

TIME  NOW:22SEP87 

20 

27 

03    10 

17 

24 

OCT 

OCT 

NOV   NOV 

NOV 

NOV 

87 

87 

87    87 

87 

87 

I      I 


P300         2    2  DRAINAGE  WORK                    XX. .HH 1     1     1     1     1     1     1     1 

i     1     1     1     1     1     1     1     1 

P200         2   2  EXCAVATION                      XX..   |     |     |     |     |     |     |     |     | 

*     1     1     1     1     1     1     1     1     i 

P400         6   6  GARDENING  WORK                   XXXXHHXX. . .HH HH..     1     1     1     1     1     1 

1     1     1     1     1     1     1     1     1 

PI 00         3    3  MATERIAL  DELIVERY                 CCC    |     |     |     |     |     |     |     |     | 

1     1     1     1     1     1     1     1     1 

P700         5   5  FOUNDATION                      *XXHHXXX..   I     |     |     |     |     |     |     | 

1     1     1     1     1     1     1     1     1 

P800         3   3  DOORS  &  WINDOWS                   *  XHHXX...HH 1     1     1     1     1     1     1 

1     1     1     1     1     1     1     1     1 

P500         4    4  ROOF  FABRICATION                  *  XHHXXX..   I     I     I     I     I     |     |     | 

P1100        3   3  ELECTRICAL  WORK                   *  XHHXX...HH HH..     1     1     1     I     I     I 

*     1     1     1  .   '1     1     1     i     1     1 

P600         6    6  WALL  FABRICATION                  *  CHHCCCCC   I     I     |     |     |     |     {     | 

1     1     1     1     1     1     1     1     1 

P1300        2   2  INSTALL  FENCE  &  POSTS               «     |XX.HH HH....    I     I     I     I     |     | 

*     1     1     1     1     1     1     1     1     1 

P900         5   5  ERECTION                       «     |    CCCCC   |     |     |     |     |     |     | 

*  1     1     1     1     1     1     1     1     1 

P1000        2   2  PLUMBING  WORK                    *     |    XX... HH..     1     1     1     1     I     | 

*  1     1     1     1     1     1     1     1     1 

P1200        2    2  PAINTING                        *     1     1    CC     |     |     |     |     |     | 

1     1     1     1     1     1     1     1     1 

P1400        2   2  DO  FINISHING                     *     1     1     |CC    |     |     |     |     |     | 

*     1     1     1     1     1     1     1     1     I 

BAR  CHART  KEY: 

A:  Actual 

C:  Critical 

P:  In  Progress 

X:  Planned 

B:  Baseline 

H:  Holiday 
.:  Float 


Note:  All  characters  represent   1  tine  units. 
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Project 


PDMDEMO 


Description  :  Open  Plan  Demonstration  Network  (PDM) 


Act i  vi  ty 


22 

SEP 

87 


29 

SEP 

87 


06 

OCT 

87 


13 

OCT 

87 


20 

OCT 
87 


27 

OCT 
87 


03 

NOV 

87 


10 

NOV 

87 


1  7 

NOV 

87 


24 

NOV 

87 


P300 

P200 

P400 

P100 

P700 

P800 

P500 

PI  100 

P600 

P1300 

P900 

P1000 

P1200 

P1400 


Time  Now 


* 
* 


iiiuiiiiuiiiiuuMuwnn 
I 


miiiuiiiiuuiiinunuui 


Bar  Chart  Key 


=  is  Planned,  A  is  Actual,  _  is  Float,   is  Critical 

P  is  In  Progress  (all  characters  represent   1  time  units) 
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OPEN  PLAN 

TEST  OPEN  PLAN 

INCORPORATED 

PAGE:   1 

REPORT:  ACTRES 

ACTIVITY  RESOURCE  LISTING  BY  EARLY  START 

REPORT  DATE:23HAY87 

PROJECT:  POHOEMO 

Open 

Plan  Oe(K)nstrat 

ion  Network  (PDM) 

TIME  NOW:22SEP87 

REM  ORIG 

OUR  OUR  DESCRIPTION 

C0DE1 

C00E2 

•RESOURCE- 
QTY 

\ 

EARLY 
START 

EARLY 
FINISH 

TOTAL 
FLOAT 

ACTIVITY 

CODE   T 

0/S  DUR 

P300 

2  DRAINAGE  WORK 

DEPTB 

UTIL 

5 

0 

0 

22SEP87 

23SEP87 

7 

P200 

2  EXCAVATION 

OEPTB 

GEN 

8 

0 

0 

22SEP87 

23SEP87 

2 

P400 

6  GARDENING  WORK 

DEPTB 

OECO 

6 

0 

0 

22SEP87 

29SEP87 

10 

P100 

3  MATERIAL  DELIVERY 

DEPTA 

GEN 

5 

0 

0 

22SEP87 

24SEP87 

0 

P700 

5  FOUNDATION 

DEPTB 

GEN 

10 

0 

0 

24SEP87 

30SEP87 

2 

P800 

3  DOORS  &  WINDOWS 

DEPTB 

GEN 

4 

0 

0 

25SEP87 

29SEP87 

8 

P500 

4  ROOF  FABRICATION 

DEPTA 

GEN 

4 

0 

0 

25SEP87 

30SEP87 

2 

P1100 

3  ELECTRICAL  WORK 

DEPTA 

UTIL 

4 

0 

0 

25SEP87 

29SEP87 

10 

P600  •_ 

6  WALL  FABRICATION 

DEPTA 

GEN 

5 

0 

0 

25SEP87 

02OCT87 

0 

P1300 

2  INSTALL  FENCE  &  POSTS 

DEPTB 

GEN 

3 

0 

0 

30SEP87 

01OCT87 

10 

P900 

5  ERECTION 

DEPTB 

GEN 

6 

0 

0 

05OCT87 

090CT87 

0 

P1000 

2  PLUMBING  WORK 

DEPTA 

UTIL 

4 

0 

0 

05OCT87 

06OCT87 

5 

P1200 

2  PAINTING 

DEPTB 

DECO 

4 

0 

0 

120CT87 

130CT87 

0 

PUOO 

2  00  FINISHING 

DEPTA 

GEN 

8 
5 

0 

0 

0 
0 

140CT87 

150CT87 

0 

no 


OPEN  PLAN 
.:«EPORT:  ACTRES 
J  PROJECT:  PDHDEMO 


REM  ORIG 
APII'VITY   DUR  OUR  DESCRIPTION 


TEST  OPEN  PLAN  INCORPORATED 

ACTIVITY  RESOURCE  LISTING  BY  SCHEDULED  START 

Open  Plan  Deroonstration  Network  (PDM) 


PAGE:   1 
REPORT  DATE:23MAY87 
TIME  NOW:22SEP87 


< RESOURCE >   SCHEDULED    SCHEDULED   TOTAL 

CODEl  C0DE2   CODE   T     QTY  O/S  DUR   START       FINISH      FLOAT 


pm 

2 

2  DRAINAGE  WORK 

pioo- 

3 

3  MATERIAL  DELIVERY 

P200 

p- 

2 

2  EXCAVATION 

P800 

3 

3  DOORS  &  WINDOWS 

P500- 

4 

4  ROOF  FABRICATION 

f6oe. 

6 

6  WALL  FABRICATION 

f700 

1  !,'     '"' 

5 

5  FOUNDATION 

3 

3  ELECTRICAL  WORK 

P900 1";;-. 

5 

5  ERECTION 

PIOM  .V- 

2 

2  PLUMBING  WORK 

f400  •■ 

6 

6  GARDENING  WORK 

P1200 

2 

2  PAINTING 

P1490  ■   - 

2 

2  DO  FINISHING 

P130II 


2    2  INSTALL  FENCE  &  POSTS 


DEPTB 

UTIL 

A 

DEPTA 

GEN 

A 

DEPTB 

GEN 

A 

DEPTB 

GEN 

A 

DEPTA 

GEN 

A 

DEPTA 

GEN 

A 

DEPTB 

GEN 

A 

DEPTA 

UTIL 

A 

DEPTB 

GEN 

A 

DEPTA 

UTIL 

A 

DEPTB 

DECO 

A 

DEPTB 

OECO 

A 

DEPTA 

GEN 

A 
B 

DEPTB 

GEN 

A 

5 

0 

0 

25SEP87 

28SEP87 

5 

0 

0 

02OCT87 

06OCT87 

8 

0 

0 

05OCT87 

06OCT87 

4 

0 

0 

07OCT87 

09OCT87 

4 

0 

0 

07OCT87 

120CT87 

5 

0 

0 

07OCT87 

140CT87 

10 

0 

0 

130CT87 

190CT87 

4 

0 

0 

150CT87 

190CT87 

6 

0 

0 

20OCT87 

260CT87 

4 

0 

0 

20OCT87 

210CT87 

6 

0 

0 

220CT87 

290CT87 

4 

0 

0 

270CT87 

280CT87 

8 
5 

0 
0 

0 

0 

290CT87 

30OCT87 

3    0   0   30OCT87 


02NOV87 


7 
0 
2 
8 
2 
0 
2 

10 
0 
5 

10 
0 
0 

10 
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OPEN  PLAN 


TEST  OPEN  PUN  INCORPORATED 


PAGE: 


REPORT:  ACTSS 
PROJECT:  POHOEHO 


SCHEDULED  START  ACTIVITY  LISTING  by  SCHEDULED  START 
Open  Plan  Demonstration  Network  (POM) 


REPORT  DATE:  23MAY87 


TIME  NOW:  22SEP87 


REM  ORIG 
ACTIVITY   DUR  DUR   DESCRIPTION 


P300 

P100 

P200 

P800 

P500 

P600 

P700 

P1100 

P900 

P1000 

P400 

P1200 

PUOO 

P1300 


DRAINAGE  WORK 

MATERIAL  DELIVERY 

EXCAVATION 

DOORS  &  WINDOWS 

ROOF  FABRICATION 

WALL  FABRICATION 

FOUNDATION 

ELECTRICAL  WORK 

ERECTION 

PLUMBING  WORK 

GARDENING  WORK 

PAINTING 

DO  FINISHING 

INSTALL  FENCE  &  POSTS 

SCHEDULED     SCHEDULED   UTE       LATE 
CODE  1  CODE  2   START        FINISH      START      FINISH 


DEPTB 

UTIL 

25SEP87 

28SEP87 

010CT87 

020CT87 

DEPTA 

GEN 

02OCT87 

06OCT87 

22SEP87 

24SEP87 

DEPTB 

GEN 

05OCT87 

06OCT87 

24SEP87 

25SEP87 

DEPTB 

GEN 

07OCT87 

09OCT87 

07OCT87 

09OCT87 

OEPTA 

GEN 

070CT87 

120CT87 

29SEP87 

02OCT87 

DEPTA 

GEN 

07OCT87 

140CT87 

25SEP87 

02OCT87 

DEPTB 

GEN 

130CT87 

190CT87 

28SEP87 

02OCT87 

DEPTA 

UTIL 

150CT87 

190CT87 

09OCT87 

130CT87 

DEPTB 

GEN 

20OCT87 

260CT87 

05OCT87 

090CT87 

DEPTA 

UTIL 

20OCT87 

210CT87 

120CT87 

130CT87 

DEPTB 

OECO 

220CT87 

290CT87 

06OCT87 

130CT87 

DEPTB 

DECO 

270CT87 

280CT87 

120CT87 

130CT87 

DEPTA 

GEN 

230CT87 

300CT87 

140CT87 

150CT87 

DEPTB 

GEN 

30OCT87 

02NOV87 

140CT87 

150CT87 

TOTAL 
FLOAT 

7 
0 
2 
8 
2 
0 
2 

10 
0 
5 

10 
0 
0 

10 


112 


Report  GRAFRES   on  Project  ADMDEMO  :  Open  Plan  Demonstration  Network  (ADM) 
RESOURCE  HISTOGRAM  on  Early  Dates  for  Resource  A   :  RESOURCE  A 
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03 
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10 
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17 
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Report  GRAFRES   on  Project  ADMDEMO  :  Open  Plan  Demonstration  Network  (ADM) 
RESOURCE  HISTOGRAM  on  Scheduled  Dates  for  Resource  A   :  RESOURCE  A 
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26 
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17 
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24 
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31 

11 
07 

14 

SEP 

SEP 

SEP 

SEP 
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87 

87 

87 

87 

87 

87 
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87 

87 

87 
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iyL?VOF>ROJrECT 


taken  from 
Richard  0.  Gamble  II,  "Construction  Scheduling 
Using  MacProject",  Department  of  Civil  Engineering, 
University  of  Florida,  1986. 
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PROJECT 


FILE26 


05-23-1987 


LISTING  OF  ACTIVITIES 


RESOURCES 

REQ' 

D 

ACT. 

DESCRIPTION 

DUR. 

UNIT  COST 

#1 

#2 

#3 

#4 

#5 

DEPENDENCIES 

1 

MOVE  IN 

6 

$456 . 00 

0 

2 

5 

6 

0 

0 

2 

EXCAVATE  SITE 

7 

$1 ,234 .00 

8 

14 

4 

6 

20 

1 

6 

INSTALL  POWER 

15 

$345.00 

0 

2 

0 

4 

0 

2 

3 

ERECT  FORMS 

3 

$345 .00 

0 

2 

6 

6 

0 

2 

4 

PLACE  CONCRETE 

3 

$34.00 

0 

0 

0 

6 

0 

3 

5 

CLEAN  UP 

2 

$23.00 

0 

1 

0 

2 

0 

1 
4 

1 

2    3 

7 

INSP.&  MOVE  OUT 

2 

$23.00 

0 

1 

0 

4 

0 

2    3 

4 

5    6 

RESOURCE  *  1 

RESOURCE  #  2 

RESOURCE  #  3 

RESOURCE  #  4 

RESOURCE  #  5 


BULLDOZERS 
TRUCKS 
CARPENTERS 
LABORERS 

FRONT  END  LOADERS 
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05-23-1987 


PROJECT:  FILE26 


CPM  NETWORK  ANALYSIS 


CT. 

DESCRIPTION 

DUR. 

COST 

ES 

EF 

LS 

LF 

TF 

CP 

1 

MOVE  IN 

6 

$2,736 .00 

0 

6 

0 

•6 

0 

* 

2 

EXCAVATE  SITE 

7 

$8, 638.00 

6 

13 

6 

13 

0 

* 

6 

INSTALL  POWER 

15 

$5. 175.00 

13 

28 

13 

28 

0 

« 

3 

ERECT  FORMS 

3 

$1 ,035.00 

13 

16 

20 

23 

7 

4 

PLACE  CONCRETE 

3 

$102 .00 

16 

19 

23 

26 

7 

5 

CLEAN  UP 

2 

$46 . 00 

19 

21 

26 

28 

7 

7 

INSP.&  MOVE  OUT 

2 

$46.00 

28 

30 

28 

30 

0 

« 

TOTAL  DURATION  OF  PROJECT  IS 


DIRECT  COST  OF  PROJECT  IS 


INDIRECT  COST  OF  PROJECT  IS 


TOTAL  COST  FOR  PROJECT  IS 


30 


$17 , 778 . 00 

$1 , 020 . 00 
$18 , 798 . 00 
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PROJECT:  FILE26 


6ANTT     (BAR)     CHART 


ACT. 

DESCRIPTION 

1 

HOVE  IN 

2 

EXCAVATE  SITE 

6 

INSTALL  POWER 

3 

ERECT  FORMS 

4 

PUCE  CONCRETE 

5 

CLEAN  UP 

7 

INSP.&  MOVE  OUT 

15 


21 


24 


27 


30 


I         I         I        I        I 


l*iMJliMi-^i3iS^3MiU-HUi.iJ4iniHV-i 


TOTAL  DURATION:  30 


LEGEND: 


DIRECT  COST: 
INDIRECT  COST: 


$17,778.00 
$1,020.00 


TOTAL  COST  FOR  PROJECT: 


$18,798.00 


CRITICAL  PATH: 
NON  CRITICAL: 
FLOAT  TIME: 
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05-23-1987 


PROJECT:  FILE26 


RESOURCE:  BULLDOZERS 

RESOURCE    LISTING    &    HISTOGRAM    iiliiii 


10 


*Y 

DATE 

IN  USE 

1 

20  DEC  86 

0 

2 

21  DEC 

86 

0 

3 

22  DEC 

86 

0 

4 

23  DEC  86 

0 

5 

24  DEC  86 

0 

6 

25  DEC  86 

0 

7 

26  DEC 

86 

8 

8 

27  DEC  86 

8 

9 

28  DEC  86 

8 

10 

29  DEC  86 

8 

11 

30  DEC  86 

8 

12 

31  DEC 

86 

8 

13 

1  JAN 

87 

8 

14 

2  JAN 

87 

0 

IS 

3  JAN 

87 

0 

6 

4  JAN 

87 

0 

7 

5  JAN 

87 

0 

8 

6  JAN 

87 

0 

9 

7  JAN 

87 

0 

!0 

8  JAN 

87 

0 

!1 

9  JAN 

87 

0 

!2 

10  JAN 

87 

0 

!3 

n  JAN 

87 

0 

!4 

12  JAN 

87 

0 

J5 

13  JAN 

87 

0 

!6 

14  JAN 

87 

0 

!7 

15  JAN 

87 

0 

!8 

16  JAN 

87 

0 

!9 

17  JAN 

87 

0 

10 

18  JAN 

87 

0 

i    I    I    I    I 


I    I    I    I    I    I    I    I    I    I 
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05-23-1987 


PROJECT:  FILE26 
RESOURCE:  TRUCKS 

^^mm^^M§Mm  resource  listing  &  histogram 


DATE 

20  DEC  86 

21  DEC  85 

22  DEC  86 

23  DEC  86 

24  DEC  86 

25  DEC  86 

26  DEC  86 

27  DEC  86 

28  DEC  86 

29  DEC  86 

30  DEC  86 

31  DEC  86 

1  JAN  87 

2  JAN  87 

3  JAN  87 

4  JAN  87 

5  JAN  87 

6  JAN  87 

7  JAN  87 

8  JAN  87 

9  JAN  87 

10  JAN  87 

11  JAN  87 

12  JAN  87 

13  JAN  87 

14  JAN  87 

15  JAN  87 

16  JAN  87 

17  JAN  87 

18  JAN  87 


IN  USE 


I    I    1    I    I 


14 


16 


18 


20 
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05-23-1987 


PROJECT:  FILE26 


RESOURCE:  CARPENTERS 

iliiillliillllll  resource  listing  j  histogram 


DATE   IN 

US 

20  DEC  86 

21  DEC  86 

22  DEC  86 

23  DEC  86 

24  DEC  86 

25  DEC  86 

26  DEC  86 

27  DEC  86 

28  DEC  86 

29  DEC  86 

30  DEC  86 

31  DEC  86 

1  JAN  87 

2  JAN  87 

3  JAN  87 

4  JAN  87 

5  JAN  87 

0 

6  JAN  87 

0 

7  JAN  87 

0 

8  JAN  87 

0 

9  JAN  87 

0 

10  JAN  87 

0 

11  JAN  87 

0 

12  JAN  87 

0 

13  JAN  87 

0 

14  JAN  87 

0 

15  JAN  87 

0 

16  JAN  87 

0 

17  JAN  87 

0 

18  JAN  87 

0 
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05-23-1987 


PROJECT:  FILE26 


RESOURCE:  LABORERS 
^^M:IM&MIM  RESOURCE  LISTING  &  HISTOGRAM 


DAY 

1 
2 
3 
4 
5 
6 
7 
8 
9 

10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 


DATE 

20  DEC  86 

21  DEC  86 

22  DEC  86 

23  DEC  86 

24  DEC  85 

25  DEC  86 

26  DEC  86 

27  DEC  86 

28  DEC  86 

29  DEC  86 

30  DEC  86 

31  DEC  86 

1  JAN  87 

2  JAN  87 

3  JAN  87 

4  JAN  87 

5  JAN  87 

6  JAN  87 

7  JAN  87 

8  JAN  87 

9  JAN  87 

10  JAN  87 

11  JAN  87 

12  JAN  87 

13  JAN  87 

14  JAN  87 

15  JAN  87 

16  JAN  87 

17  JAN  87 

18  JAN  87 
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05-23-1987 


PROJECT:  FILE26 


RESOURCE:  FRONT  END  LOADERS 

illilillllllllliilili  RESOURCE  listing  &  histogram 


10 


12 


14 


16 


20 


lAY 

DATE 

IN  USE 

1 

20  DEC  88 

0 

2 

21  DEC  86 

0 

3 

22  DEC  86 

0 

4 

23  DEC  86 

0 

5 

24  DEC  86 

0 

6 

25  DEC  86 

0 

7 

26  DEC  86 

20 

8 

27  DEC  86 

20 

9 

28  DEC  86 

20 

10 

29  DEC  86 

20 

11 

30  DEC  86 

20 

12 

31  DEC  86 

20 

13 

1  JAN  87 

20 

14 

2  JAN  87 

0 

15 

3  JAN  87 

0 

16 

4  JAN  87 

0 

17 

5  JAN  87 

0 

18 

6  JAN  87 

0 

19 

7  JAN  87 

0 

20 

8  JAN  87 

0 

21 

9  JAN  87 

0 

22 

10  JAN  87 

0 

23 

11  JAN  87 

0 

24 

12  JAN  87 

0 

25 

13  JAN  87 

0 

26 

14  JAN  87 

0 

27 

15  JAN  87 

0 

28 

16  JAN  87 

0 

29 

17  JAN  87 

0 

30 

18  JAN  87 

0 

I    I    I    I    I    I    I    I    I    I    I 


'  -    fn.iTij 

T?    /?.^' 
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■f*^*ifjf^^^^*A*tif|#*#*?«??^*^^*?f 

^^£^ml4  f fj  TIF  til 

m 

^il^^pti 

mm 

^^^Ml 

m 

m 

^^^ 

126 


SOURCE 
UMBER 


PROJECT 
NAME 

FILE27.RES 


RESOURCE 
NAME 

TRUCKS 


DATE 


#  REQ'D   0 


13 


18 


23 


26 

27 

28 

29 

30 

31 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

1 


DEC 
DEC 
DEC 
DEC 
DEC 
DEC 

JAN 

JAN 

JAN 

JAN 

JAN 

JAN 

JAN 

JAN 

JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 

FEB 


86 
86 
86 
86 
86 
86 

87 

87 

87 

87 

87 

87 

87 

87 

87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 
87 

87 


2  FEB  87 

3  FEB  87 

YOU  WANT 


TO 


4 

4 

4 

4 

23 

23 

23 

23 

23 

23 

23 

23 

23 

23 

3 

3 

3 

3 

3 

2 

2 


0 

QUIT 


AND  RETURN  TO  DOS  (Y/N)? 
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OURCE 

PROJECT 

RESOURCE 

MBER 

NAME 

NAME 

1 

FILE26 .RES 

TRUCKS 

2 

FILE27.RES 

TRUCKS 

DATE 


#  REQ'D 


14 


22 


29 


37 


20  DEC 

21  DEC 

22  DEC 

23  DEC 

24  DEC 

25  DEC 

26  DEC 

27  DEC 

28  DEC 

29  DEC 

30  DEC 

31  DEC 

I  JAN 
JAN 
JAN 
JAN 
JAN 
JAN 
JAN 

8  JAN 

9  JAN 

10  JAN 

II  JAN 

12  JAN 

13  JAN 

14  JAN 

15  JAN 

16  JAN 

17  JAN 

18  JAN 
.19  JAN 

20  JAN 

21  JAN 

22  JAN 

23  JAN 

24  JAN 

25  JAN 

26  JAN 

27  JAN 

28  JAN 

29  JAN 

30  JAN 

31  JAN 

1  FEB 

2  FEB 

3  FEB 
you  WA 


86 

86 

86 

86 

86 

86 

86 

86 

86 

86 

86 

86 
87 
87 
87 
87 
87 
87 
87 
87 
87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 

87 
87 
87 
87 
NT  TO 


2 

2 

2 

2 

2 

2 

18 

18 

18 

18 

37 

37 

37 

27 

27 

27 

25 

25 

25 

26 

6 

5 

5 

5 

5 

4 

4 

3 

2 

2 


0 

QUIT 


11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

12 

12 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 


1222 
1222 
1222 
1122 
1122 
1222 
1222 
1222 
1222 
1222 
1222 
12 


22 

22 

22 

22 

22 

22 

22 

22 

2 

2 

2 

2 


111122222 

111122222 

111122222 

111122222 

11112222222222222222222222222222222 

11112222222222222222222222222222222 

11112222222222222222222222222222222 
2222222222222222222222222222 
2222222222222222222222222222 
2222222222222222222222222222 
22222222222222222222222222 
22222222222222222222222222 
22222222222222222222222222 
222222222222222222222222222 


AND  RETURN  TO  DOS  (Y/N)? 
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50  DEFINT  B,D,E,G-L,N, P-Z 
100  DEFSNG  A,C,F,M,0 

CLS:  KEY  OFF 

GOTO  2800 

X=1 :Y=1 :W=75 

COLOR  12 

LOCATE  Y,X 

PRINT  CHR$(20  1 )+STRI NG$ ( W , CHR$ ( 205 ) )+CHR$ ( 1 87 ) 

FOR  N=1  TO  21 

CHR$( 186)+STRING$(W,CHR$(32))+CHR$( 186) 


150 
200 
250 

300 

350 

400 

450 

500 

550 

600 

650 

700 

750 

800 

850 

900 

950 

1000 

1050 

1  100 

1  150 

1200 

1250 

1300 

1350 

1400 

1450 

1500 

1550 

1600 


LOCATE 
NEXT 

LOCATE  Y+N 
COLOR  1 1 
LOCATE  3,25: 
LOCATE  4,25: 
LOCATE  5,25: 
LOCATE  6,25: 
LOCATE  7,25: 
LOCATE  8,25: 
LOCATE  9,25 


Y+N,X:PRINT 


X: PRINT  CHR$(2  00)+STRING$(W,CHR$(205))+CHR$( 188) 


PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
:PRINT 


LOCATE  10 
COLOR  13 
LOCATE  13 
LOCATE  15 
LOCATE  16 
LOCATE  18 
COLOR  14 
LOCATE  22 


25:PRINT' 

39:PRINT 
33:PRINT 
20:PRINT 
30:PRINT 


CCCC 
CCCCCCC 
CCC     CC 
CCC 
CCC 

CCC  CC 
"  CCCCCCC 
CCCC 

by" 
Edward  ,. 


PPPPPP 
PPPPPPPP 
PPP    PPP 
PPP    PPP 
PPPPPPP 
PPP 

PPP 

PPP 


MM  MM" 
MMM  MMM" 
MMMM  MMMM" 
MMMMMMMMM" 
MM  MMM  MM" 


MM 
MM 
MM 


Von  Hagel" 
Some  subroutines  written 
University  of  Florida" 


MM" 
MM" 
MM" 


by  Robert  D.  Rotz 


FOR  T 
COLOR 
CLS 
PRINT 


=  1 
7 


28 

TO 


PRINT 
4000: 


" Version 
NEXT 


25  -  27  FEB  1987 


THIS  PROGRAM  WILL  DETERMINE  THE  CRITICAL  PATH  IN  COMPLETING  CON 


STRUCTION" 
1650  PRINT 


1700 
1750 
1800 
1850 
1900 
1950 
2000 


PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 


START/" 
2050  PRINT 
TAL" 

2100  PRINT 
2150  PRINT 
ITY  CAN" 
2200  PRINT 
T  BE  A" 
2250  PRINT 
HE  EXTRA" 
2300  PRINT 


PROJECTS.    INFORMATION  REQUIRED  TO  RUN  THE  PROGRAM  INCLUDES:":  PRINT 
ACTIVITY  NUMBER" 

ACTIVITY  DESCRIPTION  (optional)" 
DURATION  OF  EACH  ACTIVITY" 
DEPENDENCIES  FOR  EACH  ACTIVITY" 

COST  PER  UNIT  DURATION  FOR  EACH  ACTIVITY  (optional)" 
JOB  OVERHEAD  COST  PER  UNIT  DURATION  (optional)":  PRINT 
OUTPUT  WILL  CONSIST  OF  THE  EARLY  START/FINISH  DATES,  LATE 

FINISH  DATES,  CRITICAL  ACTIVITY  FLAGS,  TOTAL  TIME  FOR  COMPLETION,  TO 


COST  FOR  THE  PROJECT 
THE  PROGRAM  CAN 


(optional),  AND  A  GANTT  (BAR)  CHART 
HANDLE  A  MAXIMUM  OF  175  ACTIVITIES. 


:  PRINT 
EACH  ACTIV 


HAVE  A  MAXIMUM  OF  6  DEPENDENT  ACTIVITIES 


ACTIVITY  DESCRIPTIONS  MUS 


MAXIMUM  OF  15  CHARACTERS, 


CHARACTERS 
COLOR  12 


ARE  TRUNCATED 


IF  MORE  THAN  15  CHARACTERS  ARE  ENTERED,  T 
ACTIVITIES  MAY  BE  ENTERED  IN  ANY  ORDER." 


2350  PRINT 

2400  PRINT 

2450  PRINT:PRINT  "IF 

2500  PRINT:  COLOR  7 

2550  LOCATE  24,1: INPUT 


YOU  HAVE  A  SEPARATE  DATA  DISK,  PLACE  IT  IN  DRIVE  <A>  NOW 


DO  YOU  WISH  TO  CONTINUE  (Y  or  N)";A$:  PRINT 
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2600  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  2900 
2650  IF  A$="N"  OR  A$="n"  THEN  38050 

2700  BEEP:L0CATE  22.1:C0L0R  12:  PRINT  "PLEASE  ANSWER   Y   FOR  YES  OR   N   FOR  NO." 
;:C0L0R  7:PRINT:G0T0  2550 

2750  ]{£;]4*********»*:***«**********************«****************=i'=*'****«***»***** 
2800  REff  ********************************************************* g £ Q  T  fj  PROGRAM 
2850  i^£y[*  ********************************************************************  * 
2900  CLS:  SOUND  300,1:  SOUND  400.2:  SOUND  900,3 

2  9  50  V$  =  DATE$ : WIDTH  "LPTl:  ",132:X$  =  STRING$(25,177)  :Y$  =  STRING$(4,196)  :U$  =  STRING$( 
1,  197) 

3000  Pl$="###":  P2$="\  \":  P3$= "$$####,.##" :  P4$="###    ":P5$="###  " 

3050  P6$="$$#######»*. . ##" :  P7$="$$#######, . ##" 
3100  REM 

3150  REM****************************************    MM  =  #  OF  ACTIVITIES  ALLOWED 
3200  REM****************************************    MM1=  #  OF  DEPENDENCIES  ALLOWE 
ID 

!3250  REM 
3300  N=l 
3350  MM=150 

3400  MMl  =10:  REM******N0TE  MMl  may  not  exceed  10  unless  a  change  is  also  made 
in  the  way  that  data  in  stored  in  the  input  and  write  statements.*************** 
3450  MM2  =5  :  REM******NOTE  MM2  may  not  exceed  10  unless  a  change  is  also  made 
in  the  way  that  data  is  stored  in  the  input  and  write  statements.*************** 
3500  DIM  ACT(MM),  DESC$(MM),  DUR(MM).  COST(MM),  DEPON ( MM , 1 1 ) ,  K(MM),  PED(MM.ll) 
3550  DIM  ES(MM) , EF{MM) ,LS(MM) ,  LF(MM),  TF(MM),  ACTCOST{MM) 
360  0  DIM  RESOURCES ( 10) . RESOURCE (MM , 10) , PRO JECTNAMESS ( 75 ) , ACTN0S(75) 
3650  DIM  DATEREC(400 , 5) ,  JDATE(400) 
3700  CALCRUNS  =  "Y" 

3750  REM*********************************************************************** 
3800  REM***********************DISPLAY  CURRENT  FILES  AND  OFFER  TO  RETRIEVE  DATA 
3850  REM*********************************************************************** 
3900  OPEN  "PROJLIST"  FOR  APPEND  AS  #2:  CLOSE 
3950  OPEN  "I",  2,  "PROJLIST" 
4000  NNN  =  0 

4050  PRINT:  COLOR  14:  PRINT  "  THE  PROJECTS  LISTED  BELOW  ARE  CURRENTLY  ON  FILE." 
4100  PRINT 

4150  PRINT  "      PROJECT  PROJECT  PROJECT  PRO 

JECT  " 

4200  PRINT  "    #     NAME  #     NAME  #     NAME  # 

NAME" 

4250  P8$  =  "  ###   \  \     ###   \  \     ###   \  \       #«#   \ 

(  \" 

4300  COLOR  7 

4350  FOR  X  =  1  TO  80  :  PRINT  "-";:  NEXT 
4400  IF  EOF  (2)  THEN  CLOSE  :  GOTO  4600 
4450  NNN  =  1  +  NNN 

4500  INPUT#2,  PROJECTNAMES$(NNN)  ,  ACTNOS ( NNN )  : PR  INT  USING  P8$ ;  NNN;  PROJECTNAMES 
$(NNN)  ; 

4550  GOTO  4400 
4600  IF  NNN  =  0  THEN  5150 

4650  LOCATE  22,1:  INPUT  "DO  YOU  WISH  TO  RECALL  DATA  FROM  AN  EXISTING  PROJECT  LIS 
TED  ABOVE  (Y  OR  N) " ; A$ 

4700  IF  A$  =  "N"  OR  A$  =  "n"  THEN  5150 
4750  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  4850 

4800  BEEP:C0L0R  12:  PRINT  "PLEASE  ANSWER   Y   FOR  YES  OR   N   FOR  NO .": COLOR  7: 
GOTO  4650 
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4850  :LOCATE  22,1:PRINT" 


4900  :LOCATE  23,1:PRINT" 


22,1:  INPUT  "WHICH  PROJECT  DO  YOU  WISH  TO  RECALL  (ENTER  THE  PROJECT 


4950  LOCATE 

#)  ";  NNNl 

5000  IF  NNNl  >  NNN  OR  NNNl  <  1 

MBERS":C0L0R  7 : BEEP :  GOTO  4950 

5050  PR0J$  =  PR0JECTNAMES$(NNN1 ) 

5100  GOTO  36200 

5150  CLS  :  PRINT  .-INPUT  "WHAT  IS  THE  NAME 

5200  IF  PR0J$  =  ""  THEN  COLOR  12:  INPUT 

TTER.    ",PROJ$  :  GOTO  5200 

5250  IF  LEN  (PR0J$)  >  8  THEN  COLOR  12:  INPUT 

HAN  8  CHARICTERS.    ",  PROJ$  :  GOTO  5200 


THEN  COLOR  12: PRINT  "YOU  MUST  ONE  OF  THE  ABOVE  NU 
N  =  ACTNOS(NNNl) 


OF  THIS  NEW  PROJECT";  PROJ$ :  PRINT 
PLEASE  START  THE  PROJECT  NAME  WITH  A 


LE 


PLEASE  ENTER  A  NAME  WITH  NO  MORE  T 


5300 
5350 

I 

'54  00 
5450 
ROJ$ 
5500 
5  550 
5600 
5650 

5700 
5750 
5800 
5850 
5  900 
5  950 


IF  ASC(LEFT$  (PROJ$.l))  < 
INPUT  "  PLEASE  START  THE 
IF  ASC(LEFT$  (PR0J$,1))  > 
INPUT  "  PLEASE  START  THE 
NEWPROJ$  =  "Y" 
IF  PROJ$  =  "PROJLIST"  THEN 


65   OR   ASC(LEFT$  (PR0J$,1)) 
PROJECT  NAME  WITH  A  LETTER. 
90   AND   ASC(LEFT$  (PROJ$.l)) 
PROJECT  NAME  WITH  A  LETTER. 


>122  THEN  COLOR  12: 
".PROJ$  :GOTO  5200 

<  97  THEN  COLOR  12 
" . PROJ$  :  GOTO  5200 


BEEP:C0L0R  12:  INPUT  "PLEASE  USE  ANOTHER  NAME",P 


<=  122  THEN  UPPERCASE 


PLASE  USE 
3000  COLOR 


MATCH$  =  "N" 

FOR  X  =  1  TO  LEN(PROJ$) 

LOWERCASE  =  ASC ( MI D$ ( PRO J$ , X . 1 )  ) 

IF  LOWERCASE  >=  97  AND  LOWERCASE 

ELSE  UPPERCASE  =  LOWERCASE 

MID$(PROJ$,X, 1)  =  CHR$(UPPERCASE) 

NEXT  X 

FOR  X  =  1  TO  NNN 

IF  PROJ$  =  PROJECTNAMES$(X)  THEN  MATCHS  = 

NEXT  X 

THEN  COLOR  12:  INPUT  "YOU  ALREADY 

,PROJ$:GOTO  5200 


LOWERCASE  -  32 


"  Y  ti 


IF 


HAVE  A  FILE  BY  THAT  NAME 


MATCH$  =  "Y' 

ANOTHER. 

7 

GOTO  7400 

REM  ***********************************************:t**»**m**************** 

REM  *************************************************** *******p^QQ^fi^^H    MENU 

REM   ******  »*«»«»«  ****»«*«**«*****«**»*«*****«**:|e*««««**«««*»««»«*]|c«»«»*««« 


3050 
3100 
5150 
3200 

3250  CLS  :  PRINT  X$ 

3300  PRINT 

3350  PRINT 

3400  PRINT 

5450  PRINT 

3500  PRINT 

5550  PRINT 

3600  PRINT 

5650  PRINT 

3700  PRINT 

3750  PRINT 

3800  INPUT 

5850  IF  SELECTION  > 
IS  NOT  ONE  THAT  IS 

5900  CLS 

3950  IF  SELECTION  = 

7000  IF  SELECTION  = 

7050  IF  SELECTION  = 


PROGRAM  MENU 


X$:  PRINT 


TAB(20) 
TAB(20) 
TAB(20) 
TAB(20) 
TAB(20) 
TAB(20) 
TAB(20) 
TAB(20) 


(1) 
(2) 
(3) 
(4) 
(5) 
(6) 
(7) 
(8) 


VIEW  DATA  ON  SCREEN":  PRINT 
EDIT  EXISTING  DATA":PRINT 
ADD  NEW  ACTIVITY":  PRINT 
DELETE  AN  ACTIVITY"  :PRINT 
GANTT  (BAR)  CHART"  :PRINT 
DELETE  A  PROJECT  FROM  FILES 
DISPLAY  RESOURCE  HISTORGRAM": 
EXIT  PROJECT  AND  SAVE.   AND/OR 

"THE  CURRENT  PROGRAM  AND  DATA  FILE  IS:  ":PROJ$ 

"ENTER  SELECTION  ";  SELECTION 

8  OR  SELECTION  <  1  THEN  BEEP : COLOR  12 
AVAILABLE":  COLOR  7:PRINT:  GOTO  6800 


PRINT 
PRINT 

^QUIT 
PRINT 


PRINT 


PRINT  "YOUR  SELECTION 


1  GOTO  11600 

2  THEN  CALCRUN$  =  "Y" 

3  THEN  CALCRUN$  =  "Y" 


HISTCALC$  = 
HISTCALC$  = 


'Y" 
'Y" 


:G0T0 
:  GOTO 


15200 
11500 
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7100  IF  SELECTION  =  4  GOTO  31550 

7150  IF  SELECTION  =  5  GOTO  27800 

7200  IF  SELECTION  =  6  GOTO  38250 

7250  IF  SELECTION  =  7  GOTO  39650 

7300  IF  SELECTION  =  8  GOTO  37650 

7350  REM  ********************************************************************* 

7400  REM  ************************************************** I  fjpuT  ACTIVITY  DATA 
7450  REM  ********************************************************************* 

7500  CLS 

7550  INPUT  "YOU  MAY  MANAGE  UP  TO  FIVE  RESOURCES.   DO  YOU  WISH  TO  UTILIZE  THIS  OP 

TION  (Y/N)";A$:  CLS 

7600  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  7750 

7650  IF  A$  =  "N"  OR  A$  =  "n"  THEN  9050 

7700  BEEP:  GOTO  7550 

7750  COLOR  14:PRINT  "IF  YOU  HAVE  NO  ADDITIONAL  RESOURCES  YOU  WISH  TO  TRACK  JUST 

STRIKE  'RETURN' " rCOLOR  7 

7800  PRINT 

7850  PRINT: INPUT  "WHAT  YEAR  DOES  THIS  PROJECT  START  (e.g.  87)";SJ$ 

7900  IF  SJ$  =  ""  THEN  SJ$  =  "7" 

7950  IF  ASC(RIGHT$(SJ$ , 1  )  )  >=  48  AND  ASC ( R I GHT$ ( S J$ , 1 )  )  <=  57  THEN  8050 

8000  COLOR  12:  PRINT  "PLEASE  ENTER  EITHER  NOTHING  OR  THE  YEAR":C0L0R  7 : GOTO  7850 

8050  PRINT: INPUT  "WHAT  MONTH  DOES  THIS  PROJECT  START  (1  TO  12)";DA$ 

8100  IF  DA$  =  ""  THEN  DAS  =  "1" 

3150  IF  VAL(DA$)  >=  1  AND  VAL(DA$)  <=  12  THEN  GOTO  8250 

3200  COLOR  12:  PRINT  "ENTER  A  INTIGER  FROM  1  TO  12  TO  REPRESENT  THE  MONTH": 
L      COLOR  7  :  GOTO  8050 
13250  PRINT: INPUT  "WHAT  DAY  OF  THE  MONTH  DOES  THIS  PROJECT  START(1  TO  31)";TE$ 

3300  IF  TE$  =  ""  THEN  TE$  =  "1" 

3350  IF  VAL(TE$)  >=  1  AND  VAL(TE$)  <=  31  THEN  GOTO  8450 

3400  COLOR  12:  PRINT  "ENTER  AN  INTIGER  FROM  1  TO  31  TO  REPRESENT  THE  DAY": 
COLOR  7:G0T0  8250 

3450  GOSUB  45100 

J500  PRINT 

3550  INPUT  "WHAT  IS  THE  FIRST  RESOURCE  YOU  WISH  TO  TRACK "; RESOURCES ( 1  ) 

J600  PRINT 

)650  INPUT  "WHAT  IS  THE  SECOND  RESOURCE  YOU  WISH  TO  TRACK "; RESOURCES ( 2 ) 

J700  PRINT 

J750  INPUT  "WHAT  IS  THE  THIRD  RESOURCE  YOU  WISH  TO  TRACK "; RESOURCES ( 3  ) 

1800  PRINT 

1850  INPUT  "WHAT  IS  THE  FOURTH  RESOURCE  YOU  WISH  TO  TRACK "; RESOURCES ( 4  ) 

1900  PRINT 

1950  INPUT  "WHAT  IS  THE  FIFTH  RESOURCE  YOU  WISH  TO  TRACK "; RESOURCES ( 5 ) 

1000  PRINT 

1050  CLS  :  INPUT  "WHAT  IS  THE  JOB  OVERHEAD  COST  PER  UNIT  DURATION";  OHC 

1100  IF  OHC<0  THEN  BEEP:  GOTO  9050 

•150  N=l 

1200  CLS 

'250  COLOR  14:PRINT  "BEGIN  ENTERING  DATA  FOR  EACH  ACTIVITY  WITHIN  THE  PROJECT"  : 
PRINT:  COLOR  7 

300  INPUT  "WHAT  IS  THE  CODE  NUMBER  FOR  THIS  ACTIVITY";  ACT(N):  PRINT 
350  INPUT  "WHAT  IS  THE  DESCRIPTION  FOR  THIS  ACTIVITY";  DESCS{N):  PRINT 
400  INPUT  "WHAT  IS  THE  DURATION  FOR  THIS  ACTIVITY";  DUR(N):  PRINT 
450  IF  DUR(N)<1  THEN  BEEP:  GOTO  9400 
500  INPUT  "WHAT  IS  THE  COST  PER  UNIT  DURATION  FOR  THIS  ACT  I VI TY "  ; COST ( N )  : PR  I  NT 
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^550  IF  COST(N)<0  THEN  BEEP:  GOTO  9500 

)600  INPUT  "THIS  ACTIVITY  IS  DEPENDENT  UPON  HOW  MANY  ACTIVITIES  BEING  COMPLETED" 
;      D:  PRINT 

)650  IF  D<0  THEN  BEEP:  GOTO  9600 
)700  IF  D>MM1  THEN  BEEP:  COLOR  12:  PRINT  "MAXIMUM  OF  ";  MMl ;  "DEPENDENCIES  ONLY" 

FOR  X=l  TO  2000:  NEXT:  COLOR  7:  CLS:  PRINT:  GOTO  9600 
)750  IF  DOO  THEN  9950 
)800  K(N)=0 
•850  DEP0N(N,1)=0 
1900  GOTO  10750 
1950  K(N)=D 
.0000  FOR  X=l  TO  D 

0050  IF  D  =  1  THEN  DEP$  =  "":  GOTO  10600 
0100  IF  X  =  1  THEN  DEP$  =  "FIRST" 
0150  IF  X  =  2  THEN  DEP$  =  "SECOND" 
0200  IF  X  =  3  THEN  DEP$  =  "THIRD" 
0250  IF  X  =  4  THEN  DEP$  =  "FOURTH" 
0300  IF  X  =  5  THEN  DEP$  =  "FIFTH" 
0350  IF  X  =  6  THEN  DEP$  =  "SIXTH" 
0400  IF  X  =  7  THEN  DEP$  =  "SEVENTH" 
0450  IF  X  =  8  THEN  DEP$  =  "EIGHTH" 
0500  IF  X  =  9  THEN  DEP$  =  "NINTH" 
0550  IF  X  =  10  THEN  DEP$  =  "TENTH" 

0600  PRINT  "INPUT  "  DEP$  "  DEPENDENT  ACTIVITY  CODE  NUMBER ";: I NPUT  DEPON(N,X):  P 
INT 

0650  IF  DEP0N(N.X)<1  THEN  BEEP:  GOTO  10600 
0700  NEXT  X 

0750  INPUT  "DOES  THIS  ACTIVITY  USE  ANY  OF  THE  IDENTIFIED  RESOURCES  (Y/N)":A$ 
0800  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  10950 
0850  IF  A$  =  "N"  OR  A$  =  "n"  THEN  11200 
0900  BEEP:G0T0  10750 
0950  FOR  X  =  1  TO  5 

1000  IF  RESOURCE$(X)  =  ""  THEN  11150 

1050  PRINT  "HOW  MANY  "; RESOURCES ( X ); "  DO  YOU  NEED  FOR  THIS  ACTIVITY"; 
1100  INPUT  RESOURCE(N,X) 
1150  NEXT 

1200  PRINT: INPUT  "DO  YOU  NEED  TO  REASK  QUESTIONS  FOR  THIS  ACTIVITY  (Y  or  N)";A$ 
PRINT 

1250  IF  A$="Y"  OR  A$="N"  OR  A$  =  "y"  OR  A$  =  "n"  THEN  11300  ELSE  BEEP:  GOTO  112 
0 

1300  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  GOTO  9200 
1350  INPUT  "ENTER  ANOTHER  ACTIVITY  (Y  or  N)";  A$ :  PRINT 

1400  IF  A$="Y"  OR  A$="N"  OR  A$  =  "y"  OR  A$  =  "n"  THEN  11450  ELSE  BEEP:  GOTO  113 
0 

1450  IF  A$  =  "N"  OR  A$  =  "n"  THEN  CLS:  GOTO  11550 
1500  N=N+1 :  GOTO  9200 

1550  PRINT  X$  "     PROGRAM  MENU     "  X$ :  PRINT:  PRINT:  GOTO  6350 
1600  REM  *********»***************************************************»*m*m*** 

1650  REM  ************««*****************«***«*«**«**««***«*viEW  DATA  ON  SCREEN 
1700  REM  ********************************************************************* 

1750  PRINT  TAB(60) ;  V$ 

1800  PRINT  TAB{10);  "PROJECT:    ";  PROJ$ :  PRINT 
1850  PRINT  X$  "      LISTING  OF  ACTIVITIES      "  X$ :   PRINT 
1900  PRINT  TAB(44) ; "RESOURCES  REQ'D" 

1950  PRINT  TAB( 1 ); "ACT. " ;TAB(7) ; "DESCRIPTION" ;TAB(25 ); "DUR ." ;TAB(30) ; "UNIT  COST 
;  TAB (43) ; " #1 " ; TAB { 47 ) ; " #2 " ; TAB (51 ) ; "#3" ; TAB (55) ; "#4" ; TAB (59) ; "»5" ; TAB (66) ; "DEP 
:NDENCIES":  PRINT 
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FOR  X 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

FOR  Y 

IF  Y  = 

A=Y+1 : 

PRINT 

IF  B  =  0 

NEXT  Y 

NEXT  X 

PRINT: 

FOR  X 

IF  RES 

NEXT 
PRINT: 
INPUT 
IF  A$  = 


12000 
12050 
12100 
12150 
L  2  2  0  0 
L2250 
12  3  0  0 

2  3  5  0 
.2400 
.2450 
.2500 

2550 

2600 

2  6  5  0 

2700 

2750 

2800 

2850 

2900 

2950 

3000 

) 

3050 

,3100 

3150 
132  00 

0 

3250  IF  A$= 

3300  INPUT 
I)";  A$ 
*3350  IF  A$ 

INT:PRINT:G 

3400  IF  A$ 
COLOR 
LPRINT 
LPRINT 
LPRINT 
LPRINT 
LPRINT 


=  1  TO  N 
TAB(l)  :  PRI 
TAB(7)   :  PRI 
TAB{25) :  PRI 
TAB(29) :  PRI 
TAB(42) :  PRI 
TAB(46) :  PRI 
TAB{50) :  PRI 
TAB(54) :  PRI 
TAB(58) :  PRI 
TAB(66) ; 
=  1  TO  MMl 
4  OR  Y  =  7 
B=DEPON(X. A 
USING  P5$;  D 
THEN  PRINT 


PRINT 
=  1  TO  5 
0URCE$(X)  = 


NT  USING  Pl$ ;ACT(X) ; 
NT  USING  P2$ ;DESC$(X) ; 
NT  USING  Pl$ ;DUR(X) ; 
NT  USING  P3$ ;C0ST{X) ; 
NT  USING  Pl$ ;RES0URCE(X, 1 ) 
NT  USING  Pl$ ;RES0URCE(X. 2) 
NT  USING  Pl$ ;RES0URCE(X,3) 
NT  USING  Pl$ ;RES0URCE(X,4) 
NT  USING  P1$;RES0URCE(X.5) 


OR  Y  =  10  THEN  PRINT  TAB(66) 

) 

EP0N(X. Y) ; 

"  ":  GOTO  12850 


GOTO  13050  ELSE  PRINT  "RESOURCE  #";X;  "=  ";RES0URCE$( 


PRINT 

"PRINT  HARD  COPY  (Y/N)";A$ 

"Y"  OR  A$="N"  OR  A$  =  "n"  OR 


A$  = 


THEN  13250  ELSE  BEEP:  GOTO  131 


"Y"  OR  A$  =  "y"  THEN  13500 

"DO  YOU  WISH  TO  SEE  THE  CPM  TABLE  WITH  START  AND  FINISH  DATES  (Y  OR 


3450 
3500 
3  55  0 
3600 
3650 
*3  7  0  0 


I";  TAB  (43) 

liNDENCIES" 

3750  FOR  X 


3800 
3850 

3900 
3950 

:iooo 

1050 

;uoo 

.U50 

:i2oo 

:i250 

:i300 

A350 

:i400 

;i450 
».5  00 


LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

FOR  Y 

IF  Y  = 

A=Y+1 : 

LPRINT 

IF  B  =  0 


=  "  N  " 
OTO  63 

12  :  PR 
TAB  (6 
TAB{  1 
X$  " 
TAB{4 
TAB(1 

"  #  1 "  ;  T 
PRINT 

=  1  TO 
TAB(1 
TAB  (7 
TAB  (2 
TAB  (2 
TAB  (4 
TAB  (4 
TAB  (5 
TAB(5 
TAB  (5 
TAB  (6 

=  1  TO 
4  OR 
B  =  DEP 
USING 
THEN 


OR  A$  =  "n"  THEN  CLS 

50 

OR  A$  = 

INT  "PL 


PRINT  X$  " 


PROGRAM  MENU 


"  X$  :  P 


"y"  THEN  20000 
EASE  ENTER  Y  OR  N 


COLOR  7:  GOTO  13300 


V$ 
"PRO 
LIST 
"RES 
ACT. 
AB(47)  ; 


0) 
0) 

4) 
)  ; 


JECT:   ";PR0J$:  LPRINT 

ING  OF  ACTIVITIES      "  X$ :  LPRINT 

OURCES  REQ'D" 

"  ;TAB{7)  ;  "DESCRIPTION"  ; TAB (25)  ;  "DUR .  "  ; TAB (30)  ;  "UNIT  COS 

"#2" ;TAB(51) ; "#3" ; TAB (55) ; "*4" ; TAB (59) ; " #5 " ; TAB ( 66 ) ; "DE 


N 

) 

) 
5) 
9) 
2) 
6) 
0) 
4) 
8) 
6) 

MMl 
Y  =  7  0 
ON(X.A) 

P  5  $  ;  D 
LPRINT: 


LPR 
LPR 
LPR 
LPR 
LPR 
LPR 
LPR 
LPR 
LPR 


INT 
INT 
INT 
INT 
INT 
INT 
INT 
INT 
INT 


USING 
USING 
USING 
USING 
USING 
USING 
USING 
USING 
USING 


Pl$ 
P2$ 
Pl$ 
P3$ 


ACT(X) ; 
DESC$(X) 
DUR(X) ; 
COST(X) ; 


P1$;RES0URCE(X, 1 ) 
P1$;RES0URCE(X.2) 
Pl$ ;RESOURCE(X. 3) 
Pl$ ;RESOURCE(X, 4) 
Pl$ ;RESOURCE(X, 5) 


R  Y  =  10  THEN  LPRINT  TAB(66) 

EP0N(X, Y) ; 
GOTO  14650 
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4550  NEXT  Y 

4600  LPRINT 

4650  NEXT  X 

4700  LPRINT:  LPRINT 

4750  FOR  X  =  1  TO  5 

4800  IF  RESOURCE$(X)  =  ""  GOTO  13050  ELSE  LPRINT  "RESOURCE  #";X;  "=  ";RES0URCE$ 

X) 

4850  NEXT 

4900  LPRINT  CHR${12):  CLS :  PRINT  X$  "     PROGRAM  MENU     "  X$ :  PRINT:  PRINT 

4950  INPUT  "DO  YOU  WISH  TO  SEE  THE  CPM  TABLE  WITH  START  AND  FINISH  DATES  (Y  OR 

)  "  :  A$ 

5000  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  20000 

5050  IF  A$  =  "N"  OR  A$  =  "n"  THEN  CLS  :   PRINT  X$  "     PROGRAM  MENU      "  X$ : PR 

NT:PRINT:GOTO  6350 

5100  GOTO  6350 

5150  REM  ********************************************************************* 

5200  REM  ***«««*****»**«*****«*««««**********««***«««EDIT  AN  EXISTING  ACTIVITY 
5250  REM  ********************************************************************* 

5300  CLS: INPUT  "DO  YOU  WISH  TO  CHANGE  THE  PROJECT  OVERHEAD  COST.  RESOURCE  NAMES 

OR  THE  INITIAL  START  DATE  (Y/N)";A$ 

;5350  IF  A$  =  "Y"  OR  A$  =  "y"  OR  A$  =  "N"  OR  A$  =  "n"  THEN  15400  ELSE  BEEP: 

GOTO  15300 
:5400  IF  A$  =  "N"  OR  A$  =  "n"  THEN  17050 
;S450  REM 

:3500  CLS  :COLOR  14 

:)550  PRINT  "STRIKE  RETURN  TO  MAINTAIN  DEFAULT  VALUE  IN  BRACKETS" 
:5600  COLOR  7 
j)650  PRINT  :PRINT  "OVERHEAD  COST  IN  DOLLARS  PER  UNIT  TIME  IS  ["OHC"]"; 

: INPUT  "",0HC1$ 
])700  IF  0HC1$  =  ""  THEN  15800 
n750  OHC  =  VAL{0HC1$) 
3>800  FOR  X  =  1  TO  5 

1>850  PRINT:PRINT  "RESOURCE  #"X"  IS  [ "RESOURCES ( X )"]";: INPUT  " " , RESOURCElS 
])900  IF  RESOURCEIS  =  ""  THEN  16000 
31950  RESOURCE$(X)  =  RES0URCE1$ 
IJOOO  NEXT 

31050  JDATE(l)  =  SJDATE 
3)100  X  =  1 
11150  GOSUB  44050 

11200  PRINT:PRINT  "THE  CURRENT  START  DATE  FOR  THE  FIRST  ACTIVITY  IS  " ; CALDATED ; 
I    CALDATEM$;CALDATEY; "  (Y/N).  "; 
'250  INPUT  "".A$ 

1300  IF  A$  =  ""  OR  A$  =  "y"  OR  A$  =  "Y"  THEN  17000 

1350  GOSUB  44050  :PRINT:PRINT  "WHAT  YEAR  DOES  THIS  PROJECT  START  [";CALDATEY: 
I     "  ] " ; : INPUT  "" ;SJ1$ 
T4OO  IF  SJ1$  =  ""  THEN  SJ$  =  STR$(CALDATEY) :  GOTO  16550 

t450  IF  ASC(RIGHT$(SJ1$ , 1 ) )  >=  48  AND  ASC ( R I GHT$ ( S Jl $ , 1 ) )  <=  57  THEN  SJ$=SJ1$: 
GOTO  16550 
1500  COLOR  12:PRINT  "PLEASE  ENTER  THE  YEAR":COLOR  7 : GOTO  16350 

1550  PRINT:PRINT  "WHAT  MONTH  DOES  THIS  PROJECT  START  (ENTER  VALUE  OF  1  TO  12)  [ 
"CALDATEMS; "] "        ;: INPUT  "";DA1$ 

1600  IF  DA1$  =  ""  THEN  A$=A$:IF  DA$  <>  ""  THEN  16750:G0SUB  46050  : GOTO  16750 
1650  IF  VAL(DA1$)  >=  1  AND  VAL(DA1$)  <=  12  THEN  DAS  =  DA1$:  GOTO  16750 

t700  COLOR  12:  PRINT  "ENTER  A  INTIGER  FROM  1  TO  12  TO  REPRESENT  THE  MONTH": 
COLOR  7  :  GOTO  16550 
1750  PRINT:PRINT  "WHAT  DAY  OF  THE  MONTH  DOES  THIS  PROJECT  START  ["; CALDATED ; "  ] 
: INPUT  " " ;TE1$ 
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6800  IF  TE1$  =  ""  THEN   16950 

6850  IF  VAL(TE1$)  >=  1  AND  VAL(TE1$)  <=  31  THEN  TE$  =  TE1$:G0T0  16950 

6900  COLOR  12:  PRINT  "ENTER  AN  INTIGER  FROM  1  TO  31  TO  REPRESENT  THE  DAY": 

COLOR  7:G0T0  16750 
6950  GOSUB  45100 
7000  GOTO  6150 

7050  CLS  : INPUT  "ENTER  THE  CODE  NUMBER  OF  THE  ACTIVITY  YOU  WISH  TO  EDIT.  " . CHAC 
::PRINT 

7100  COLOR  14:PRINT  "TO  KEEP  THE  DEFAULT  VALUE  INDICATED  USE  THE  (RETURN)  KEY." 
pRINT:C0L0R  7 
i7150  FOR  CH  =  1  TO  N 

J7200  IF  ACT(CH)  <>  CHACT  THEN  GOTO  17300 
;7250  M  =  CH:  GOTO  17450 
(7300  NEXT  CH 

(r350  COLOR  12:  PRINT  "CODE  NUMBER  DOES  NOT  MATCH  AN  EXISTING  ACTIVITY":  COLOR  7 
;  PRINT 

lUOO  INPUT  "PUSH  [ENTER]  TO  RETURN  TO  MAIN  MENU";  G$ :  GOTO  19800 
ir450  PRINT  "ENTER  ACTIVITY  CODE  NUMBER:  {"  ACT{M)  ")";:INPUT  ACT1$:  PRINT 
rSOO  IF  ACT1$  =  ""  THEN  17600 
1'550  ACT(M)  =  VAL(ACT1$) 

reOO  PRINT  "ENTER  ACTIVITY  DESCRIPTION:  ("  DESC${M)  ")";:INPUT  DESC1$:  PRINT 
r650  IF  DESC1$  =  ""  THEN  17750 
r700  DESC$(M)  =  DESC1$ 

1750  PRINT  "ENTER  ACTIVITY  DURATION:   ("  DUR(M)  ")";:  INPUT  DUR1$:  PRINT 
1800  IF  DUR1$  =  ""  THEN  17900 
1850  DUR{M)  =  VAL(DUR1$) 

1900  IF  DUR(M)<1  THEN  BEEP:  GOTO  17750 
1950  PRINT  "ENTER  ACTIVITY  COST  PER  UNIT  DURATION:  ("  COST(M)  ")";:  INPUT  COSTS 

:  PRINT 
1000  IF  COSTS  =  ""  THEN  18100 
1050  COST(M)  =  VAL(C0ST$) 

1100  IF  C0ST(M)<0  THEN  BEEP:  GOTO  17950 

1150  PRINT  "ENTER  NUMBER  OF  DEPENDENCIES:  ("  K(M)  ")";:  INPUT  Dl$:  PRINT 
1200  IF  Dl$  =  ""  THEN  D  =  K(M)  :G0T0  18300 
1250  D  =  VAL(D1$) 

1300  IF  D<0  THEN  BEEP:  GOTO  18150 
1350  IF  D>MM1  THEN  BEEP:  COLOR  31:  PRINT  "MAXIMUM  OF  "  MMl  "DEPENDENCIES  ONLY": 

OR  X=l  TO  2000:  NEXT:  COLOR  7:  CLS:  PRINT:  GOTO  18150 
1400  IF  D  <>  0  THEN  18500 

1450  K(M)  =  0:  DEPON ( M , 1 ) =0 :  GOTO  19500 
1500  K{M)  =  D 
L550  FOR  X  =  1  TO  D 

1600  IF  D  =  1  THEN  DEP$  =  "":  GOTO  19150 
1650  IF  X  =  1  THEN  DEP$  =  "FIRST" 
1700  IF  X  =  2  THEN  DEP$  =  "SECOND" 
1750  IF  X  =  3  THEN  DEP$  =  "THIRD" 
1800  IF  X  =  4  THEN  DEP$  =  "FOURTH" 

850  IF  X  =  5  THEN  DEP$  =  "FIFTH" 
.900  IF  X  =  6  THEN  DEP$  =  "SIXTH" 

950  IF  X  =  7  THEN  DEP$  =  "SEVENTH" 

000  IF  X  =  8  THEN  DEP$  =  "EIGHTH" 

050  IF  X  =  9  THEN  DEP$  =  "NINTH" 

100  IF  X  =  10  THEN  DEP$  =  "TENTH" 

150  PRINT  "INPUT  "DEP$  "  DEPENDENT  ACTIVITY  CODE  NUMBER  ("  DEPON(M.X)  ")";:INP 
'  DEPON$:  PRINT 

200  IF  DEPON$  =  ""  THEN  19300 

250  DEP0N(M,X)  =  VAL(DEP0N$) 
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19300  IF  DEP0N(M,X)<1  THEN  BEEP:  GOTO  19150 

19350  NEXT  X 

19400  IF  D+1>MM1  THEN  19800 

19450  FOR  X  =  D+1  TO  MMl  :  DEP0N(M.X)=0  :  NEXT  X 

19500  FOR  X  =  1  TO  5 

19550  PRINT  :PRINT  "THE  NUMBER  OF  "RESOURCES ( X ) "  NEEDED   IS  [" RESOURCE (M , X )"]" ; 

19600  INPUT  "" ,RES0URCE1$ 

19650  IF  RESOURCEIS  =  ""  THEN  GOTO  19750 

19700  RES0URCE(M,X)  =  VAL ( RESOURCE  1$ ) 

19750  NEXT 

19800  CLS:  PRINT  X$  "     PROGRAM  MENU     "  X$ :  PRINT:  PRINT:  GOTO  6350 

19850  REM  ********************************************************************* 

19900  REM  *******************************««****************RUN  CPM  CALCULATIONS 
19950  REM  ********************************************************************* 

20000  IF  CALCRUNS  =  "N"  THEN  24950 

20050  CLS 

20100  COLOR  14 

20150  PRINT  TAB(30)  "INITIALIZING  VARIABLES":  PRINT 

20200  ERASE  PED ,  ES ,  EF ,  LS .  LF,  TF ,  ACTCOST 

20250  DIM  PED(MM.IO),  ES(MM),  EF(MM),  LS(MM),  LF(MM),  TF ( MM ) .  ACTCOST(MM) 

20300  CALCRUNS  =  "N" 

20350  PRINT  TAB(30);  "PRE-SORTING  IN  PROGRESS":  PRINT 

20400  FOR  PRESORT  =  1  TO  MMl 

20450  FOR  X  =  1  TO  N 

20500  IF  K(X)=0  THEN  21650 

20550  FOR  y  =  1  TO  K(X) 

20600  FOR  Z  =  1  TO  X 

20650  IF  DEPON(X,Y)  =  ACT(Z)  THEN  21600 

20700  NEXT  Z 

20750  FOR  ZZ  =  X  TO  N 

20800  IF  DEP0N{X,Y)  <>  ACT(ZZ)  THEN  21450 

20850  AA=ACT(X):  ACT ( X ) =ACT ( ZZ ) :  ACT(ZZ)=AA 

20900  BB$=DESC$(X) :  DESC$ ( X ) =DESC$ ( ZZ ) :  DESC$ ( ZZ ) =BB$ 

20950  CC=DUR(X):  DUR ( X ) =DUR ( ZZ ) :  DUR(ZZ)=CC 

21000  DD=C0ST(X):  COST ( X ) =C0ST ( ZZ ) :  COST(ZZ)=DD 

21050  EE=K(X):  K(X)=K{ZZ):  K(ZZ)=EE 

21100  FOR  YY  =  1  TO  MMl 

21150  FF=DEP0N(X,YY) :  DEPON { X , YY ) =DEP0N ( ZZ , YY ) :  DEPON ( ZZ , YY ) =FF 

21200  NEXT  YY 

21250  FOR  YY  =  1  TO  5 

21300  GG  =  RESOURCE(X.YY) :  RESOURCE (X . YY ) =RES0URCE ( ZZ , YY ) :  RESOURCE { ZZ , YY ) =GG 

21350  NEXT  YY 

21400  GOTO  21650 

21450  NEXT  ZZ 

21500  COLOR  31:  PRINT  "DEPENDENT  ACTIVITY"  DEPON(X.Y)  "NOT  FOUND  FOR  ACTIVITY"  A 

CT(X) 

21550  FOR  DELAY=1  TO  2000:  NEXT:   COLOR  7:  GOTO  19800 

21600  NEXT  Y 

21650  NEXT  X:  NEXT  PRESORT 

21700  PRINT  TAB(30):  "PERFORMING  CALCULATIONS":  PRINT 

21750  FOR  X=l  TO  N 

21800  LT=  ACT(X) 

21850  FOR  Z  =  1  TO  N 

21900  FOR  Y  =  1  TO  MMl 

21950  LH  =  DEPON(Z.Y) 

22000  IF  LH=0  THEN  22200 

22050  IF  LTOLH  THEN  22150 
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PED(Z . Y) 
NEXT  Y 
NEXT  Z 
NEXT  X 
FOR  X  = 
IF  K(X)= 
FOR  Y  = 
J  =  PED( 
IF  ES(X) 
NEXT  Y 
GOTO  227 
ES(X)=0 
NEXT  .X 
FOR  X=N 
IF  X  <> 
LF(X)=ES 
W=LF(N) 
FOR  J=(X 
IF  K(J)= 
FOR  K=l 
IF  PED(J 
NEXT  K 
GOTO  233 
IF  LF(J) 
NEXT  J 
LF(X)=W 
NEXT  X 
TT=0:  JO 
FOR  X  = 
EF(X)=ES 
ACTCOST( 
IF  EF(X) 
NEXT  X 
PRINT  TA 
COLOR  7 
FOR  SORT 
FOR  X  = 
XX  =  X+1 
IF  ES(X) 
AA=ACT(X 
BB$=DESC 
CC=DUR(X 
DD=COST( 
EE=ACTCO 
FF  =  K(X)  : 
FOR  Y  = 
GG=DEPON 
NEXT  Y 
HH=ES(X) 
II=EF(X) 
JJ=LS(X) 
KK=LF(X) 
LL=TF(X) 
FOR  YY  = 
GG  =  RES 
NEXT  YY 
NEXT  X: 


=  X 


1  TO  N 

0  THEN  22650 

1  TO  K(X) 
X,Y) 

<  ES(J)+DUR(J)  THEN  ES ( X ) =ES ( J ) +DUR ( J ) 


00 


TO  1  STEP  -1 
N  THEN  22900 
(X)+DUR(X) :  GOTO  23400 

■i-l  )  TO  N 

0  THEN  23300 

TO  K(J) 

,K)=X  THEN  23250 

00 

-DUR(J)  <  W  THEN  W=LF ( J ) -DUR ( J ) 


BOOST  =  0 

1  TO  N 

(X)+DUR(X):  LS(X)=LF(X)-DUR(X) :  TF ( X ) =LF ( X ) -DUR { X ) -ES ( X ) 

X)=COST(X)*DUR(X) :  JOBCOST  =  JOBCOST  +  ACTCOST(X) 

>=TT   THEN  TT=EF(X) 


B(30) 


SORT  BY  EARLY  START": PRINT 


=  1  TO  MMl 
1  TO  (N-1) 

<ES(XX)  THEN  24900 

):  ACT(X)=ACT(XX) :  ACT(XX)=AA 

$(X):  DESC$(X)=DESC$(XX) :  DESC$ ( XX ) =BB$ 

):  DUR(X)=DUR(XX) :  DUR(XX)=CC 

X):  COST(X)=COST(XX) :  COST(XX)=DD 

ST(X):  ACTCOST(X)=ACTCOST(XX) :  ACTCOST ( XX ) =EE 

K(X)=K(XX) :  K(XX)=FF 
1  TO  MMl 
(X.Y):  DEPON(X, Y)=DEPON(XX, Y) :  DEPON ( XX . Y ) =GG 


ES(XX)=HH 
EF(XX)=II 
LS(XX)=JJ 
LF(XX)=KK 
TF(XX)=LL 


ES(X)=ES(XX)  : 
EF(X)=EF(XX) : 
LS(X)=LS(XX) : 
LF(X)=LF(XX) : 
TF(X)=TF(XX) : 
1  TO  5 
OURCE(X, YY) :  RESOURCE ( X , YY ) =RESOURCE ( ZZ . YY ) 

NEXT  SORT 


RESOURCE(ZZ . YY)=GG 
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24950 
25000 
25050 
25100 
25150 
25200 
25250 
25300 
25350 
25400 
25450 
25500 
2  5  5  5  0 
25600 
25650 
25700 
2  5  7  5  0 
2  5  8  0  0 
25850 
25900 
25950 
26000 
2  6  0  5  0 
26100 
2  615  0 
26200 
26250 
26300 
26350 
26400 
>6450 
)0 

J6500 

:NT:G0 

!6550 

56600 

!6650 

!6700 

16750 

16  8  0  0 

16850 

16900 

;6950 

7000 

7050 

7100 

7150 

7200 

7250 

7300 

7350 

7400 

7450 

7500 

7550 

7600 

7650 


CLS 
REM 
REM 
REM 


********************** 
********************** 


************************************* 

***************j^j^p^^Y    CALCULATED  VAL 
************************************* 


********* 

UES  TABLE 
********* 


IF  GANT$  =  "Y" 

IF  HIST$  =  "Y" 

PRINT  TAB(60) ; 

PRINT  TAB( 10)  ; 

PRINT  X$  " 

PRINT  TAB(4) 

PRINT 

PRINT 

FOR  X 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 


THEN  27950 

"  THEN  39700 

;  V$ 

;  "PROJECT:  " 
CPM  NETWORK 

"ACT. " ;TAB(9) 
TAB(48)  ;  "ES"  ;TAB(54) 
TAB(77) ; "CP" 
=  1  TO  N 

TAB(4) :  PRINT  USING 
TAB(9) :  PRINT  USING 
TAB(25) :  PRINT  USING 
TAB{32) :  PRINT  USING 
TAB(47) :  PRINT  USING 


PR0J$:  PRINT 
ANALYSIS       "  X$:  PRINT 
"DESCRIPTION" ; TAB (25) ; "DUR . " ; TAB (41 ) ; 
"EF" ; TAB (60) ; "LS" ; TAB (66) ; "LF" ; TAB (72 


"COST" ; 
)  ;  "TF"  ; 


IF  TF(X)=0 

PRINT 

NEXT  X 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

INPUT 


P1$;ACT(X) ; 
P2$;DESC$(X)  ; 

Pl$ ;DUR(X) ; 

P7$ ; ACTCOST(X) ; 

P4$;ES(X);EF(X);LS(X);LF(X);TF(X) 
THEN  PRINT  CHR$(17):  GOTO  25950 


"TOTAL  DURATION  OF  PR 
"DIRECT  COST  OF  PROJE 
USING  P6$;  JOBCOST:  P 
"INDIRECT  COST  OF  PRO 
USING  P6$;  OHC  *  TT : 
"TOTAL  COST  FOR  PROJE 
USING  P6$;  JOBCOST  + 
"PRINT  HARD  COPY  (Y  o 


IF  A$="Y"  OR  A$="N"  OR  A$  = 


OJECT  IS: 
CT  IS;  "; 
RINT 

JECT  IS:  " 
PRINT 
CT  IS:  "; 
(OHC  •  TT) 
r  N) " ;A$ 
"n"  OR  A$ 


TT:  PRINT 


PRINT 


=  "y"  THEN  26500  ELSE  BEEP:  GOTO  264 


IF  A$=" 

TO  6350 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

FOR  X  = 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

IF  TF(X 

LPRINT 

NEXT  X 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 

LPRINT 


N"  OR  A$  =  "n"  THEN  CLS: PRINT  X$  " 


PROGRAM  MENU 


"  X$: PRINT: PR 


TAB(60) 
TAB( 10) 
X$  " 
TAB(4)  ; 
TAB(48) 
TAB(77) 
1  TO  N 
TAB(4)  : 
TAB(9)  : 
TAB(25) 
TAB(32) 
TAB(47) 
)=0  THEN 


V$ 
"PROJECT:  " 
CPM  NETWORK 

ACT. " ;TAB(9) 

"ES" ;TAB(54) 

"  C  P  " 


PROJ$:  LPRINT 
ANALYSIS 
"DESCRIPTION" 
"EF" ;TAB(60)  ;  ' 


X$:  LPRINT 
TAB(25) ; "DUR 
LS"  ;TAB(66)  ;  ' 


"  ;TAB(41 ) 
LF" ;TAB(7 


; "COST" ; 
2)  ;  "TF"  : 


LPRINT  USING  P1$;ACT(X); 
LPRINT  USING  P2$ ; DESC$ ( X  )  ; 

LPRINT  USING  P1$;DUR(X); 

LPRINT  USING  P7$ ; ACTCOST ( X  )  ; 

LPRINT  USING  P4$ ; ES ( X ) ; EF ( X ) 

LPRINT  "  *  ":  GOTO  27250 


LS(X) ;LF(X) ;TF(X) 


"TOTAL  DURATION  OF  PROJECT  IS: 
"DIRECT  COST  OF  PROJECT  IS:  "; 
USING  P6$;  JOBCOST:  LPRINT 
"INDIRECT  COST  OF  PROJECT  IS:  " 
USING  P6$;  OHC  *  TT :  LPRINT 
"TOTAL  COST  FOR  PROJECT  IS:  "; 
USING  P6$;  JOBCOST  +  (OHC  *  TT ) 


TT:  LPRINT 


LPRINT 
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LPRINT  CHR$(12):  CLS :  PRINT  X$  "      PROGRAM  MENU     "  X$ :  PRINT:  PRINT 
GOTO  6350 

REM  ********************************************************************* 

REM  *************************************************** *GANTT  (BAR)  CHART 
REM  ********************************************************************* 

GANT$  =  "Y" 

IF  CALCRUN$  =  "Y"  THEN  20000 

GANT$  =  "N" 

^n  nt  f^        ^^        rw  ^n 

IF  TTT  <  5  THEN  TTT  =  5 

IF  TTT  >  5  AND  TTT  <  10  THEN  TTT  =  10 

NUM  =  TT/5:  FACTOR  =  50/TT:  MA  =  FACTOR 

PRINT  TAB(60) ;  V$ 

PRINT  TAB( 10) ; "PROJECT:  ";  PR0J$ :  PRINT 

PRINT  X$  "        GANTT  (BAR)  CHART         "  X$:PRINT  :PRINT 

PRINT  TAB (24) ; "0" ; TAB (33) ; INT( 1*NUM) ; TAB (43) ; INT(2*NUM) ; TAB (53) ; INT(3*NUM) 

TAB (63) ; INT(4*NUM) ; TAB (73) ; INT(5*NUM) 

PRINT  "ACT. " ;TAB(6) ; " DESCR I PT ION" ; TAB (24) ;CHR$( 195) ; 

FOR  X=l  TO  11 

PRINT  Y$;   :  PRINT  U$ ; 

NEXT  X 

PRINT 
;o/i^u  FOR  X=l  TO  N 
J8800  PRINT  USING  PI $; ACT ( X );: PRINT  TAB ( 6 )  ;  : PR  INT  USING  P2$ ; DESC$ ( X )  ; 
>8850  START%=(ES(k)*MA)  :  F IN  I SH*= (  ( EF ( X )  ) *MA ) 
58900  FL0AT*=(TF(X)*MA) 
>8950  FOR  BAR  =  START*  TO  FINISH* 
•9000  IF  TF(X)=0  THEN  29100 

J9050  PRINT  TAB(24-hBAR)  ;  CHR$(176);:  GOTO  29150 
J9100  PRINT  TAB(24+BAR);  CHR$(219); 
!9150  NEXT  BAR 

19200  IF  TF(X)=0  THEN  PRINT:  GOTO  29300 

•9250  FOR  SLACK=l  TO  FLOAT*:  PRINT  CHR$ ( 46 ) ; : NEXT  SLACK:  PRINT 
:9300  NEXT  X 
:9350  PRINT:  PRINT 

19400  PRINT  "TOTAL  DURATION:  ";  TT  ;  TAB ( 52 );" LEGEND :" :  PRINT 

!9450  PRINT  "DIRECT  COST:  ";:PRINT  USING  P6$;  JOBCOST;:  PRINT  TAB ( 58 )  ; " CR IT  I CAL 
'ATH:  "; 

19500  FOR  X=  1  TO  5:  PRINT  CHR$(219);:  NEXT:  PRINT 

19550  PRINT  "INDIRECT  COST:  ";:PRINT  USING  P6$;0HC*TT;:  PRINT  TAB(58);"N0N  CRITI 
;AL:    "; 

'9600  FOR  X=  1  TO  5:  PRINT  CHR$(176);:  NEXT:  PRINT 
19650  PRINT  "TOTAL  COST  FOR  PROJECT:  ";:PRINT  USING  P6$ ; JOBCOST  t- ( OHC*TT );  :  PRINT 

TAB(58)  ;  "FLOAT  TIME :      "  ; 
19700  FOR  X=l  TO  5:  PRINT  CHR$(46);:  NEXT:  PRINT 
:9750  INPUT  "PRINT  HARD  COPY  (Y  or  N)";A$ 

:9800  IF  A$="Y"  OR  A$="N"  OR  A$  =  "y"  OR  A$  =  "n"  THEN  29850  ELSE  BEEP:  GOTO  297 
0 

9850  IF  A$="N"  OR  A$  =  "n"THEN  CLS:PRINT  X$  "     PROGRAM  MENU     "  X$:PRINT:PRI 
fT:G0T0  6350 

9900  NUM  =  TT/10:  FACTOR  =  100/TT:  MA  =  FACTOR 
9950  LPRINT  TAB(115);  V$ 

0000  LPRINT  TAB(IO) ; "PROJECT:  ";  PROJ$ :  LPRINT 

0050  LPRINT  TAB(30);X$  "        GANTT  (BAR)  CHART         "  X$:LPRINT  :LPRINT  CHR$ ( 
5) 
0100  LPRINT  TAB (24  )  ;  "0"  ; TAB (33)  ;  INT( 1*NUM)  ; TAB (43)  ;  INT(2*NUM)  ; TAB (53 )  ;  INT(3*NUM 

; TAB (63) ; INT(4*NUM) ; TAB (73) ; INT(5*NUM) ; TAB (83) ; INT(6*NUM) ; TAB (93) ; INT(7»NU 

)  ; TAB (103)  ;  INT(8*NUM)  ; TAB ( 113)  ;  INT(9*NUM)  : TAB ( 122)  ;  INT ( 10*NUM) 
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30150 
30200 
30250 
30300 
30350 
30400 
3  0450 
30500 
30550 
{30600 
130650 
30700 
3  0  7  5  0 
30800 
3  0  8  5  0 
30  9  0  0 
30950 
310  0  0 
31050 
JllOO 


DESCRIPTION" ; TAB (24) ; CHR$( 195) 


LPRINT  "ACT. " ;TAB(6) 

FOR  X=l  TO  21 

LPRINT  Y$;  :  LPRINT  U$ ; 

NEXT  X 

LPRINT 

FOR  X=l  TO  N 

LPRINT  USING  Pl$ ; ACT ( X );: LPRINT  TAB(6); 

START5t={ES(X)*MA)  :  FINISH%={(EF(X))*MA) 

FLOAT%=(TF(X)*MA) 

FOR  BAR  =  START*  TO  FINISH* 

IF  TF(X)=0  THEN  30750 

LPRINT  TAB{24+BAR);  CHR$(176) 

LPRINT  TAB(24+BAR);  CHR$(219) 

NEXT  BAR 

IF  TF(X)=0  THEN  LPRINT 

FOR  SLACK=1  TO  FLOAT*: 

NEXT  X 

LPRINT:  LPRINT 

LPRINT  "TOTAL  DURATION:  ";  TT ; 

LPRINT  "DIRECT  COST:  ";:LPRINT 


LPRINT  USING  P2$:DESC$(X) 


GOTO  30800 


GOTO  30950 
LPRINT  CHR$(46) 


NEXT  SLACK:  LPRINT 


TAB(82) ; "LEGEND: " :  LPRINT 
USING  P6$;  JOBCOST;:  LPRINT 


TAB(88) ; "CRITIC 


CHR$(219) ; 
AS  #1:CL0SE 
" ; :LPRINT  USING 


NEXT:  LPRINT 


P6$;0HC*TT;:  LPRINT  TAB(88);"N0N  CR 


11350 

114  0  0 
:1450 
;1500 
1550 
1600 
1650 
1700 
1750 
1800 
1850 
1900 
1950 
2000 
2050 
2100 

12150 
2200 
2250 
2300 
2350 
2400 
2450 
2500 
2550 
2600 
2650 
2700 
2750 
2800 


CHR$(176) 

PROJECT: 

TIME: 


NEXT:  LPRINT 
LPRINT  USING  P6$ 


JOBCOST+(OHC*TT) 


NEXT:  LPRINT:  LPRINT  CHR$(18) 

PROGRAM  MENU      "  X$ : PRINT : PR  INT 


iL    PATH:  "; 

51150  FOR  X  =  1  TO  5 :  LPRINT 

$1200  OPEN  PR0J$  FOR  APPEND 

11250  LPRINT  "INDIRECT  COST: 

:TICAL:   "; 

11300  FOR  X  =  1  TO  5:  LPRINT 

LPRINT  "TOTAL  COST  FOR 

I      LPRINT  TAB(88);  "FLOAT 

FOR  X=l  TO  5:  LPRINT  CHR$(46) 

LPRINT  CHR$(12) :CLS:PRINT  X$ 

GOTO  6350 

REM  ********************************************************************* 

REM  ***************************************************j)£lj^'l^£    /^^    ACTIVITY 
REM  ********************************************************************* 

CALCRUN$  =  "Y" 

HISTCALC$  =  "Y" 

INPUT  "ENTER  CODE  NUMBER  OF  ACTIVITY  YOU  WISH  TO  DELETE "  ; DELACT : PR  I  NT 

FOR  DEL  =  1  TO  N 

IF  ACT(DEL)  <>  DELACT  THEN  GOTO  32050 

IF  DEL  =  N  THEN  GOTO  32500 

GOTO  32200 

NEXT  DEL 

COLOR  12:PRINT 

(PRINT 
2150  INPUT  "PUSH  [ENTER]  TO 
FOR  X  =  DEL  TO  (N-1) 

ACT(X)=ACT(X+1 ):  DESC$(X)=DESC$(X+1) 
C0ST(X)=C0ST(X+1 ) :  K(X)=K(X+1) 

FOR  AC  =  1  TO  MMl :  DEPON ( X , AC ) =DEP0N ( X+ 1 . AC ) :  NEXT  AC 
FOR  AC  =  1  TO  MM2  :  RESOURCE  {  X  ,  AC  )  =  RESOURCE  (  X  ^- 1  ,  AC  ):  NEXT  AC 
NEXT  X 

N=N-1  :  GOTO  6250 

REM  ********************************************************************* 

REM  **************************************************^^\/£    DATA  ON  FILE  ? 

REM  ********************************************************************* 

PRINT 

IF  NEWPROJS  =  "Y"  THEN  34150 

PRINT  "DO  YOU  WISH  THIS  DATA  TO  REPLACE  THE  PREVIOUS  DATA  ON  FILE  (Y/N)"; 
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"CODE  NUMBER  DOES  NOT  MATCH  AN  EXISTING  ACT  I VITY"  : COLOR  7 
RETURN  TO  MAIN  MENU";AB$:  GOTO  19800 

DUR(X)=DUR(X+1 ) 


32850  INPUT  A$ 

32900  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  GOTO  34150 

32950  IF  A$  =  "N"  OR  A$  =  "n"  THEN  GOTO  33050 

33000  PRINT  "ANSWER  Y  OR  N.":  BEEP:  GOTO  32800 

33050  PRINT 

33100  INPUT  "WHAT  DO  YOU  WISH  TO  CALL  THE  NEW  PROJECT  FILE  (MAXIMUM  8  LETTERS)"; 

PROJ$ 
J3150  IF  PROJ$  =  ""  THEN  INPUT  "PLEASE  START  THE  PROJECT  NAME  WITH  A  LETTER. 
'R0J$  :  GOTO  5200 

J3200  IF  LEN  (PR0J$)  >  8  THEN  INPUT  "PLEASE  ENTER  A  NAME  WITH  NO  MORE  THAN  8  CHA 
ilCTERS.   ".  PR0J$  :  GOTO  5200 

[53250  IF  ASC(LEFT$  (PROJS.l))  <  65   OR   ASC(LEFT$  (PR0J$,1))  >122  THEN  INPUT 
(>LEASE  START  THE  PROJECT  NAME  WITH  A  LETTER.    "  ,  PR0J$  :G0T0  5200 
|l3300  IF  ASC(LEFT$  (PR0J$,1))  >  90   AND   ASC(LEFT$  (PR0J$,1))  <  97  THEN  INPUT 

PLEASE  START  THE  PROJECT  NAME  WITH  A  LETTER.    ",PR0J$  :  GOTO  5200 
(3350  NEWPR0J$  =  "Y" 

13400     IF    PR0J$     =     "PROJLIST"     THEN    BEEP:     INPUT     "PLEASE    USE    ANOTHER    NAME",PR0J$ 
13450    MATCH$     =     "N" 
13500    FOR    X    =    1    TO    LEN(PR0J$) 
13550    LOWERCASE    =    ASC { MID$ ( PRO J$ , X , 1 ) ) 

3600  IF  LOWERCASE  >=  97  AND  LOWERCASE  <=  122  THEN  UPPERCASE  =  LOWERCASE  -  32 
ELSE  UPPERCASE  =  LOWERCASE 

3650  MID$(PR0J$ .X, 1 )  =  CHR$ ( UPPERCASE ) 

3700  NEXT  X 

3750  FOR  X  =  1  TO  NNN 

3800  IF  PROJ$  =  PROJECTNAMES$(X)  THEN  MATCH$  =  "Y" 

3850  NEXT  X 

3900  IF  MATCH$  =  "Y"  THEN  COLOR  12: INPUT  "YOU  ALREADY  HAVE  A  FILE  BY  THAT  NAME. 
PLASE  USE  ANOTHER.  ", PRO J$ : GOTO  5200 

3950  COLOR  7 

4000  REM  ********************************************************************* 

4050  REM  ************************************************** **SAVE  DATA  ON  PILE 
4100  REM  ********************************************************************* 

4150  CLS:  PRINT  "Saving  data  on  file  named  " ; PROJ$ 
4200  OPEN  "PROJLIST"  FOR  APPEND  AS  #2  :  CLOSE 
4250  OPEN  "0",  2,  "PROJLIST" 
4300  FOR  NNN2  =  1  TO  NNN 
4350  WRITE  #2,  PRO JECTNAMES$ ( NNN2 ) . N 
4400  NEXT 
4450  CLOSE 

4500  IF  NEWPROJS  =  "Y"  THEN  34550  ELSE  34700 
4550  OPEN  "PROJLIST"  FOR  APPEND  AS  #2 
4600  WRITE  #2.  PROJ$,  N 
4650  CLOSE 

4700  CLS:  PRINT  "Saving  data  on  file  named  " ; PROJ$ 
4750  OPEN  PROJ$  FOR  APPEND  AS  #1  : CLOSE 
4800  OPEN  "0" , 1 ,PROJ$ 

4850  WRITE  #1,  CALCRUNS ,  N,  TT .  JOBCOST,  OHC ,  HI STCALCS . S JDATE 
4900  FOR  X=  1  TO  10 
4950  WRITE  #1,  RES0URCE$(X) 
5000  NEXT  X 

5050  IF  TT  >  500  THEN  TTT  =  500  ELSE  TTT  =  TT 
5100  FOR  X  =  1  TO  TTT 
5150  WRITE  #1,  JDATE(X) 
5200  FOR  WQ  =  1  TO  5 
o250  WRITE  #1,  DATEREC(X, WQ) 
5300  NEXT  WQ 
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1  TO  N 
ACT(WQ) ,DESC$(WQ) ,DUR(WQ) ,COST(WQ) .K(WQ) 
ACTCOST{WQ),  ES(WQ),  EF(WQ).  LS{WQ),  LF{WQ),  TF(WQ) 

TO  10 
DEPON(WQ,X) , RE SOURCE (WQ.X) 


TO  5 
DATERECMAX(X) 


NEXT  X 

FOR  WQ  = 

WRITE  #1 

WRITE  #1 

FOR  X=  1 

WRITE  #1. 

NEXT  X 

NEXT  WQ 

FOR  X  =  1 

WRITE  #1, 

NEXT  X 

CLOSE 

REM*********************************************************************** 

REM************************************SAVE  RESOURCE  DATA  ON  SEPERATE  FILE 

REM*********************************************************************** 

PRINT  :PRINT  "SAVING  DATA  IN  RESOURCE  FILE" 

PR0J1$  =  PROJ$  +  ".RES" 

OPEN  PR0J1$  FOR  APPEND  AS 

OPEN  "0",  1,  PR0J1$ 

N,  SJDATE,  TT 

TO  5 

TO  TT 

DATEREC(X, Y) 


#1:  CLOSE 


DATERECMAX(Y) ,  RESOURCE$(Y) 


WRITE  *1, 

FOR  Y  =  1 

FOR  X  =  1 

WRITE  #1 , 

NEXT  X 

WRITE  #1, 

NEXT  Y 

CLOSE 

CLS 

GOTO  37850 

REM  ********************************************************************* 

REM  «***•****************«**»***«*«****««**«««*** *RETR I  EVE  DATA  FROM  FILE 
REM  ********************************************************************* 

CLS:  PRINT  "Opening  and  reading  data  from  file  named  ";PROJ$ 
OPEN  "I".1,PR0J$ 

TT,  JOBCOST,  OHC,  HISTCALC$,  SJDATE 


CALCRUNS,  N, 
TO  10 
RESOURCES (X) 


INPUT  #1 

FOR  X=  1 

INPUT  #1 

NEXT  X 

IF  TT  >  500  THEN 

FOR  X  =  1  TO  TTT 

INPUT  #1 ,  JDATE(X) 


TTT  =  500  ELSE  TTT  =  TT 


FOR  WQ  = 
INPUT  #1, 
NEXT  WQ 
NEXT  X 
FOR  WQ  = 
INPUT  #1, 
INPUT  #1, 
FOR  X=  1 
INPUT  #1, 
NEXT  X 
NEXT  WQ 
FOR  X  =  1 
INPUT  #1 , 
NEXT  X 
CLOSE 
CLS 


1  TO  5 
DATEREC(X,WQ) 


1  TO  N 
ACT(WQ) ,DESC$(WQ) .DUR(WQ) .COST(WQ) ,K(WQ) 
ACTCOST(WQ),  ES(WQ),  EF(WQ),  LS(WQ),  LF(WQ),  TF(WQ) 

TO  10 
DEPON(WQ,X) .RESOURCE (WQ.X) 


TO  5 
DATERECMAX(X) 
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37450  GOTO  6250 

37500  REM  ********************************************************************* 

37550  REM  **********************************************************£HD    PROGRAM 

37600  REM  ********************************************************************* 

37650  INPUT  "DID  YOU  WANT  TO  SAVE  THIS  DATA  (Y  or  N)";BZ$ 

37700  IF  BZ$  =  "Y"  OR  BZ$  =  "y"  THEN  32700 

37750  IF  BZ$  =  "N"  OR  BZ$  =  "n"  THEN  37850 

37800  BEEP  :  GOTO  37650 

37850  PRINT: INPUT  "DO  YOU  WISH  TO  WORK  WITH  ANOTHER  PROJECT  (Y/N)?  ",  A$ 

37900  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  CLS  :  SOUND  300,1  :  SOUND  400,2  :  SOUND  900,3 

:  GOTO  3700 

37950  IF  A$  =  "N"  OR  A$  =  "n"  THEN   38050 

38000  COLOR  12:PRINT  "PLEASE  ANSWER   *Y'   FOR  YES  OR   'N'   FOR  NO."  : COLOR  7: 

GOTO  37850 

38050  CLS:LOCATE  11,28:PRINT  CHR$(2);"    HAVE  A  NICE  DAY!     " ; CHR$ ( 2 ) : KEY  ON : END 

38100  i(£yi*  ******************************************************************  * 

38150  REM***************************************************KILL  DATA  ON  FILE 
38200  Y(£n*  ******************************************************************  * 

38250  OPEN  "I".  2,  "PROJLIST" 

38300  NNN  =  0 

38350  PRINT:  PRINT  "  THE  PROJECTS  LISTED  BELOW  ARE  CURRENTLY  ON  FILE." 

38400  PRINT  :  PRINT  "Project  *      Project  Name" 

38450  IF  EOF  (2)  THEN  CLOSE  :  GOTO  38650 

38500  NNN  =  1  +  NNN 

38550  INPUT#2,  PROJECTNAMES$ ( NNN ) ,  ACTNOS ( NNN ): PRINT : PRINT  NNN,  PRO JECTNAMES$ ( NN 

N) 

38600  GOTO  38450 

38650  IF  NNN  =  0  THEN  LOCATE  23,1:  INPUT  "  THERE  ARE  NO  PROJECTS  CURRENTLY  ON  FI 

LE.   STRIKE  RETURN  FOR  MENU .". A$ : GOTO  6250 

38700  LOCATE  22,1:  PRINT  "DO  YOU  WANT  TO  DELETE  ANY  OF  THE  ABOVE  PROJECTS" 

38750  LOCATE  23,1:  INPUT  "FROM  YOUR  RECORDS  (Y  OR  N)";A$ 

38800  IF  A$  =  "Y"  OR  A$  =  "y"  THEN  38900 

38850  GOTO  6250 

38900  LOCATE  22.1:PRINT" 

38950  LOCATE  23,1:PRINT" 

II 

39000  LOCATE  22,1:  INPUT  "WHAT  PROJECT  DO  YOU  WANT  TO  DELETE  FROM  YOUR  RECORDS  ( 

ENTER  ITS  PROJECT  #)";  NNN3 

39050  IF  NNN3  >  NNN  OR  NNN3  <  1  THEN  PRINT  "YOU  MUST  ONE  OF  THE  ABOVE  NUMBERS": 

:BEEP:  GOTO  39000 
39100  KILL  PR0JECTNAMES$(NNN3) 
39150  PR0JECTNAMES$(NNN3)  =  "ERASENOW" 
39200  OPEN  "PROJLIST"  FOR  APPEND  AS  #2  :  CLOSE 
39250  OPEN  "0",  2,  "PROJLIST" 
39300  FOR  NNN2  =  1  TO  NNN 

39350  IF  PR0JECTNAMES$(NNN2)  =  "ERASENOW"  THEN  39450 
39400  WRITE  #2,  PRO JECTNAMES$ ( NNN2 ) , N 
39450  NEXT 
39500  CLOSE 
39550  CLS 
39600  GOTO  38250 
39650  i{£}/[*  *********************************************************************  * 

39700  REM*»***********************************************HISTOGRAM  CALCULATIONS 
39750  K£f/[*  *********************************************************************  * 

39800  HIST$  =  "Y" 
^39850  IF  CALCRUNS  =  "Y"  THEN  GOTO  19900 
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39900 
39950 
40000 
40050 
40100 
40150 
40200 
40250 
40300 
40350 
40400 
40450 
40500 
40550 
40600 
40650 
40700 
40750 
40800 
40850 
40900 
40950 
41000 
41050 
41100 
41150 
41200 
41250 
41300 
41350 
41400 
41450 
41500 

41550 

41600 

41650 

41700 

41750 

41800 

41850 

41900 

41950 

### 

42000 

AR,  219 

42050 

42100 

42150 

42200 

42250 

42300 

42350 

42400 

42450 

42500 

42550 


IF  HISTCALC$  =  "N"  THEN  40950 

HISTCALC$  =  "N" 

HIST$  =  "N" 

COLOR  14:PRINT  "PERFORMING  HISTOGRAM  CALCULATIONS" 

FOR  XX  =  1  TO  5 

DATERECMAX(XX)  =  0 

COLOR  14 :PRINT:PRINT  "CALCULATING  FOR  "; RESOURCES ( XX ): COLOR  7 

FOR  X  =  l.  TO  TT 

DATEREC(X,XX)  =  0 

FOR  Y=l  TO  N 

IF  X>=ES(Y)+1  AND  X<=EF(Y)  THEN  DATEREC { X . XX ) =DATEREC ( X . XX ) +RES0URCE ( Y 

NEXT  Y 

IF  DATEREC(X,XX)  >  DATERECMAX (XX )  THEN  DATERECMAX ( XX )  =  DATEREC ( X , XX ) 

JDATE(X)  =  SJDATE  - 1  -i-  X 

IF  (JDATE(X)  -  365)/  1000  <=  INT ( JDATE ( X ) /1 000 )  THEN  40750 

JDATE(X)  =  JDATE(X)  +  1000  -  365 

GOTO  40600 

NEXT  X 

NEXT  XX 

CLS 

REM******************************************************************* 

REM*******************************************PRINT  RESOURCE  HISTOGRAM 

REM******************************************************************* 

FOR  XX  =  1  TO  5 

TTT  =  DATERECMAX(XX) 

IF  TTT  <  5  THEN  TTT  = 

IF  TTT  >  5  AND  TTT  < 

NUM  =TTT/5:  FACTOR  = 


5 
10  THEN 
50/TTT: 


TTT  =  10 

MA  =  FACTOR 


T:  ";  PROJS:  PRINT 

CE:  "  ;RESOURCE$ (XX) 

ISTING  &  HISTOGRAM  "  X$:PRINT  rPRINT 

(33) ; INT(1*NUM) ; TAB (43) ; INT(2*NUM) ; TAB (53) ; INT(3*NUM) 

B(73) ; INT(5*NUM) 

ATE" ; TAB (17)  ; "IN  USE" ; TAB (24)  ;CHR$(195)  ; 


PRINT  TAB(60) ;  V$ 

PRINT  TAB( 10) ; "PROJEC 

PRINT  TAB(IO) ; "RESOUR 

PRINT  X$  "  RESOURCE  L 

PRINT  TAB(24) ; "0" ; TAB 

TAB(63) ; INT(4*NUM) ; TA 

PRINT  "DAY"  ;TAB(9)  ;  "D 

FOR  X=l  TO  11 

PRINT  Y$;  :  PRINT  U$ ; 

NEXT  X 

PRINT 

FOR  X=l  TO  TT 

HOWFAR  =  DATEREC(X,XX)  *  FACTOR 

GOSUB  44050 

P10$  = 

##  \  \  ##   ####   \  \" 

PRINT  USING  P10$;  X ; CALDATED ; CALDATEMS ; CALDATEY ; DATEREC ( X , XX ); STR ING$ ( HOWF 

) 

NEXT  X 

INPUT  "STRIKE  RETURN  TO  CONTINUE". A$ 

CLS 

NEXT  XX 

INPUT  "DO  YOU  WANT  A 

IF  A$  =  "y"  OR  A$  = 

IF  A$  =  "n"  OR  A$  = 

COLOR  12:  PRINT  "  YOU 

REM****************** 

REM****************** 

REM****************** 


HARD  COPY  (Y/N)";A$ 
Y"  THEN  GOTO  42500 
N"  THEN  GOTO  6250 
MUST  ANSWER  Y  OR  N.  ":  COLOR  7  :  GOTO  42250 

«»«>ic*»»«»»»»»»»ik»«»««*»»LPPj^j  RESOURCE  HISTOGRAM 
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42600  FOR  XX  =  1  TO  5 

42650  INPUT  "PRINT  NEXT  RESOURCE  (P),  SKIP  NEXT  RESOURCE(S),   (P/S).",  A$ 

42700  IF  A$  =  "S"     OR  A$  =  "s"  THEN  43900 

42750  IF  A$  =  "P"  OR  A$  =  "p"  THEN  42850 

42800  COLOR  12  :  PRINT  "ANSWER  P  OR  S . " :  COLOR  7  :  GOTO  42650 

42850  TTT  =  DATERECMAX ( XX ) 

42900  IF  TTT  <  10  THEN  TTT  =  10 

42950  IF  TTT  >  10  AND  TTT  <  20  THEN  TTT  =  20 

43000  NUM  =TTT/10:  FACTOR  =  100/TTT:  MA  =  FACTOR 

43050  LPRINT  TAB(60);  V$ 

43100  LPRINT  TAB { 10 ) ; " PRO JECT :  ";  PR0J$ :  LPRINT 

43150  LPRINT  TAB ( 1 0 ); "RESOURCE :  "; RESOURCES ( XX ) 

43200  LPRINT  X$  "  RESOURCE  LISTING  &  HISTOGRAM  "  X$:LPRINT  : LPR I  NT : LPR I  NT  CHR$(1 

5) 

43250  LPRINT  TAB (24) ; "0" ; TAB (33) ; INT(1*NUM) ; TAB (43) ; INT(2*NUM) ; TAB (53) ; INT(3*NUM 

)  ; TAB (63)  ;  INT(4*NUM)  ; TAB (73)  ;  INT(5*NUM)  ; TAB (83)  ;  INT(6*NUM)  ; TAB (93)  ;  INT(7*  NUM)  ;T 

AB(103) ; INT(8*NUM) ; TAB ( 113) ; INT(9*NUM) ; TAB ( 122) ; INT ( 10*NUM) 

43300  LPRINT  " DAY" ; TAB ( 9 ) ; " DATE " ; TAB ( 1 7 ) ; " I N  USE " ; TAB ( 24 ) ; CHR$ ( 1 95 ) ; 

43350  FOR  X=l  TO  21 

43400  LPRINT  Y$ ;  :  LPRINT  U$ ; 

43450  NEXT  X 

43500  LPRINT 

43550  FOR  X=l  TO  TT 

43600  HOWFAR  =  DATEREC ( X . XX )  *  FACTOR 

43650  GOSUB  44050 

43700  P10$  = 

###  ##  \  \  #♦   «*#*   \ 

\" 
43750  LPRINT  USING  P10$;  X ; CALDATED ; CALDATEM$ ; CALDATEY ; DATEREC ( X , XX ); STRI NG$ ( HOW 
FAR, 219) 
43800  NEXT  X 
43850  LPRINT  CHR$(12) 
43900  LPRINT  CHR$(12):  NEXT  XX 
43950  GOTO  6250 
44000  i{£y[* *********************************************************************  * 

44050  REM***************SUBROUTINE  FOR  CONVERTING  JULIAN  DATES  TO  CALANDAR  DATES 
44100  Y{^}/[*************************************  ***************************  ******* 

44150  LY  =  0 

44200  CALDATEIS  =  STR$ ( JDATE ( X ) ) 

44250  YR  =  VAL(LEFT$(CALDATE1$,2) ) 

44300  CALDATEY  =  80  +  YR 

44350  IF  CALDATEY  =  80  OR  CALDATEY  =  84  OR  CALDATEY  =  88  THEN  LY  =  1 

44400  IF  VAL(RIGHT$(CALDATE1$ , 3) )  <=  31  THEN  CALDATEMS  =  "JAN": 

CALDATED  =  VAL ( R I GHT$ ( CALDATE 1  $ , 3 )  )  : GOTO  45000 

44450  IF  VAL(RIGHT$(CALDATE1$,3) )  <=  59  +  LY  THEN  CALDATEMS  =  "FEB": 

CALDATED  =  VAL ( RI GHT$ ( CALDATEl $ . 3 ) )  -  31  : GOTO  45000 

44500  IF  VAL(RIGHT${CALDATE1$,3) )  <=  90  +  LY  THEN  CALDATEMS  =  "MAR": 

CALDATED  =  VAL ( RIGHTS ( CALDATEl $, 3 ) )  -  (59  +  LY)  : GOTO  45000 
44550  IF  VAL(RIGHT$(CALDATE1$.3) )  <=  120  +  LY  THEN  CALDATEMS  =  "APR": 

CALDATED  =  VAL ( R I GHTS ( CALDATEl $, 3 ) )  -  (90  +  LY)  : GOTO  45000 
r44600  IF  VAL(RIGHT$(CALDATE1S , 3) )  <=  151  +  LY  THEN  CALDATEMS  =  "MAY": 

CALDATED  =  VAL ( R I GHTS ( CALDATElS , 3 ) )  -  (120  +  LY):G0T0  45000 
44650  IF  VAL(RIGHTS(CALDATE1$ , 3) )  <=  181  +  LY  THEN  CALDATEMS  =  "JUN": 

CALDATED  =  VAL ( RI GHTS ( CALDATE 1 S , 3 ) )  -  (151  +  LY):G0T0  45000 
44700  IF  VAL(RIGHTS(CALDATE1S , 3) )  <=  212  +  LY  THEN  CALDATEMS  =  "JUL": 

CALDATED  =  VAL ( R I GHTS ( CALDATE 1 S . 3 ) )  -  (181  +  LY):GOTO  45000 
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44750  IF  VAL(RIGHT${CALDATE1$.3) )  <=  243  f  LY  THEN  CALDATEM$  =  "AUG": 

CALDATED  =  VAL ( R I GHT$ ( CALDATE 1  $ . 3 )  )  -  (212  +  LY):GOTO  45000 

44800  IF  VAL{RIGHT$(CALDATE1$ , 3) )  <=  273  +  LY  THEN  CALDATEM$  =  "SEP": 

CALDATED  =  VAL ( RI GHT$ ( CALDATE 1 $, 3 ) )  -  (243  +  LY):GOTO  45000 

44850  IF  VAL(RIGHT$(CALDATE1$ , 3) )  <=  304  +  LY  THEN  CALDATEMS  =  "OCT": 

CALDATED  =  VAL ( RI 6HT$ ( CALDATE 1 $. 3 ) )  -  (273  +  LY):GOTO  45000 

44900  IF  VAL(RIGHT$(CALDATE1$,3) )  <=  334  +  LY  THEN  CALDATEMS  =  "NOV": 

CALDATED  =  VAL ( RIGHTS ( CALDATEIS . 3 ) )  -  (304  +  LY):GOTO  45000 

44950  CALDATEMS  =  "DEC"     :    CALDATED  =  VAL ( R IGHT$ ( CALDATEl $ . 3 ) )  -  (334  +  LY) 

45000  RETURN 

4  5050  ^£H*  *********************************************************************  * 

45100  REM************************SUBROUTINE  TO  CONVERT  YR/MO/DA  TO  A  JULIAN  DATE 

45150  j(£y[*  *********************************************************************  * 

45200  LY  =  0 

45250  IF  RIGHT$(SJ$, 1 )  =  "0"  OR  RIGHTS ( SJ$ , 1 )  =  "4"  OR  R I GHTS ( S JS , 1 )  =  "8"  THEN 

LY  =  1 

45300  IF  VAL(DAS)  =  1   THEN  DAY  =0    +       VAL(TE$) 

45350  IF  VAL(DAS)  =  2   THEN  DAY  =31   +        VAL(TE$) 

45400  IF  VAL(DA$)  =  3   THEN  DAY  =59   +  LY  +  VAL(TES) 

45450  IF  VAL(DAS)  =  4   THEN  DAY  =90   +  LY  +  VAL(TE$) 

45500  IF  VAL(DAS)  =  5   THEN  DAY  =  120  +  LY  +  VAL(TES) 

45550  IF  VAL(DA$)  =  6   THEN  DAY  =  151  -t-  LY  ^-  VAL(TE$) 

45600  IF  VAL(DA$)  =  7   THEN  DAY  =  181  +  LY  +  VAL(TE$) 

45650  IF  VAL(DAS)  =  8   THEN  DAY  =  212  +  LY  +  VAL(TE$) 

45700  IF  VAL(DAS)  =  9   THEN  DAY  =  243  +  LY  +  VAL(TE$) 

45750  IF  VAL(DA$)  =  10  THEN  DAY  =  273  +  LY  +  VAL(TE$) 

45800  IF  VAL(DA$)  =  11  THEN  DAY  =  304  +  LY  +  VAL(TES) 

45850  IF  VAL(DA$)  =  12  THEN  DAY  =  334  +  LY  +  VAL(TE$) 

45900  SJDATE  =  VAL ( RI GHTS ( SJS , 1 ))* 1 000   +   DAY 

45950  RETURN 

46000  f^^j/i*  ********************************************************************  * 

46050  REM»***********************************SUBROUTINE  TO  CONVERT  AUG  TO  7  ETC. 

46100  K^£}/i*  ********************************************************************  * 

46150  IF  CALDATEMS  =  "JAN"  THEN  DAS  =  "1" 

46200  IF  CALDATEMS  =  "FEB"  THEN  DAS  =  "2" 

46250  IF  CALDATEMS  =  "MAR"  THEN  DAS  =  "3" 

46300  IF  CALDATEMS  =  "APR"  THEN  DAS  =  "4" 

46350  IF  CALDATEMS  =  "MAY"  THEN  DAS  =  "5" 

46400  IF  CALDATEMS  =  "JUN"  THEN  DAS  =  "6" 

46450  IF  CALDATEMS  =  "JUL"  THEN  DAS  =  "7" 

46500  IF  CALDATEMS  =  "AUG"  THEN  DAS  =  "8" 

46550  IF  CALDATEMS  =  "SEP"  THEN  DAS  =  "9" 

46600  IF  CALDATEMS  =  "OCT"  THEN  DAS  =  "10" 

46650  IF  CALDATEMS  =  "NOV"  THEN  DAS  =  "11" 

46700  IF  CALDATEMS  =  "DEC"  THEN  DAS  =  "12" 

46750  RETURN 
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1  REM    ********«*********RESOURCE 
1000  DEFINT  A-Z 

KEY  OFF:  CLS 

Y$  =  STRING$(4 , 196) :  U$  =  STRING$(1,197 

DATEMIN  =  10000:  DATEMAX  =  0 

NUM  =  0 

DIM  PR0JECTNAMES$(50) ,ACTN0S(50) , DATERE 

DIM  INDIVIDREC( 1000 , 10) 

INPUT  "WHAT  IS  THE  EARLIEST  YEAR  THAT  A 

EARLYYEAR  =  VAL ( RIGHTS ( A$ , 1 ) )  *  365 
j^£j^m  **********************************  * 

REM*************»*********DISPLAY  CURRE 

^£  j^*  **********************************  * 

OPEN  "PROJLIST"  FOR  APPEND  AS  #2:  CLOSE 


:H***************************************** 


1100 

1200 

1250 

1300 

1400 

1500 

1600 

1700 

1800 

1900 

2000 

2100 

2200 

2300 

2400 

2500 

2600 

2700 

JECT 

2800 

NAME" 

2900 


) 

C(500, 5) ,TDATEREC( 1000) 

NY  PROJECT  USED  WILL  START" ;A$ 

*********************************** 

NT  FILES  AND  OFFER  TO  RETRIEVE  DATA 

*********************************** 


OPEN  ' 

NNN  = 

CLS 

PRINT 

PRINT 

PRINT 

II 

PRINT 


"PROJLIST" 


COLOR  14:  PRINT 


PROJECT 


THE  PROJECTS  LISTED  BELOW  ARE  CURRENTLY  ON  FILE." 


PROJECT 


NAME 


NAME 


### 


\ 


\ 


### 


\ 


:  PRINT 
CLOSE  : 


GOTO 


P8$  = 
\" 
3000  COLOR  7 
3100  FOR  X  =  1  TO  80 
3200  IF  EOF  (2)  THEN 
3300  NNN  =  1  +  NNN 

3400  INPUT#2,  PROJECTNAMES$(NNN) 
$(NNN)  ; 

3500  GOTO  3200 

3600  IF  NNN  =  0  THEN  PRINT  "YOU  HAVE  NO  FILE 
4300  LOCATE  22,1:  INPUT  "WHICH  PROJECT  DO  YO 

#)  ";  NNNl 
4400  IF  NNNl  >  NNN  OR  NNNl  <  1  THEN  COLOR  12 
MBERS":C0L0R  7:BEEP:  GOTO  4300 

4500  PR0J$  =  PR0JECTNAMES${NNN1 ) :  N  =  ACTNOS 

^£f^*  **********************************  * 

Y^£y^*  **********************************  * 
j^£yi*  **********************************  * 

CLS 

PR0J$  =  PR0J$  +  " .RES" 

OPEN  PR0J$  FOR  APPEND  AS 


PROJECT 
*     NAME 

###   \ 


PRO 

* 

###   \ 


4600 
4700 
4800 
4900 
5100 
5200 
5300 
5400 
5500 
5600 
5700 
5800 
5900 
6000 
6100 
6150 
6200 


NEXT 
3600 

ACTNOS(NNN) :PRINT  USING  P8$;  NNN;  PROJECTNAMES 


S  TO  READ" :  END 

U  WISH  TO  COMBINE  (ENTER  THE  PROJECT 

: PRINT  "YOU  MUST  ONE  OF  THE  ABOVE  NU 

(NNNl  ) 

************************************ 

******INPUT  SELECTED  DATA  FROM  FILES 

************************************ 


#1 : CLOSE 


1. 
N, 
TO 
TO 


PROJ$ 

SJDATE 

5 

TT 


OPEN  "I", 

INPUT  #1  . 

FOR  Y  =  1 

FOR  X  =  1 

INPUT  #1. 

NEXT  X 

INPUT  #1, 

NEXT  Y 

PRINT  "THE  FOLLOWING 

NUM  =  NUM  +  1 

FOR  X  =  1  TO  5 


TT 


DATEREC(X, Y) 
DATERECMAX(Y) 


RESOURCE$(Y) 


ARE  THE  RESOURCES  RECORDED  FOR  THIS  PROJECT." 
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6300  PRINT:  PRINT  X,  RESOURCE$(X) 

6400  NEXT  X 

6500  INPUT  "WHICH  RESOURCE  DO  YOU  WANT  TO  ADD  TO  THE  REPORT  (1  TO  5).";A 

6600  GOSUB  8400:  REM  convert  sjdate  to  start,  eg  1001  changed  to  0367 

6700  DAY  =  1  :  FINISH  =  START  +  TT 

6800  FOR  X  =  START  -  EARLYYEAR  TO  FINISH  -  EARLYYEAR 

6900  TDATEREC(X)  =  TDATEREC(X)  +  DATEREC { DAY , A ) 

7000  INDIVIDREC{X,NUM)  =  DATEREC ( DAY , A ) 

7100  DAY  =  DAY  +  1 

7200  IF  TDATERECMAX  <  TDATEREC{X)  THEN  TDATERECMAX  =  TDATEREC(X) 

7300  NEXT  X 

7400  IF  DATEMIN  >  START  THEN  DATEMIN  =  START 

7500  IF  DATEMAX  <  FINISH  THEN  DATEMAX  =  FINISH 

7600  PR0J1$(NUM)  =  PR0J$ 

7700  RES${NUM)  =  RES0URCE$(A) 

7800  PRINT: INPUT  "DO  YOU  WANT  TO  PRINT  THE  COMPILED  REPORT  OR  ADD  ANOTHER  RESOUR 

CE  (P/A)";A$ 

7810  IF  A$'="P"  OR  A$="p"  OR  A$="A"  OR  A$  =  "a"  THEN  GOTO  7900 

7820  COLOR  12:  PRINT  "ANSWER  'A'  FOR  ADD  OR  'P'  FOR  PR  I  NT .": COLOR  7 : GOTO  7800 

7900  IF  A$  =  "P"  OR  A$  =  "p"  THEN  CLS :  GOSUB  9400 

8000  IF  A$  =  "A"  OR  A$  =  "a"  THEN  GOTO  8200 

8110  PRINT: INPUT  "DO  YOU  WANT  TO  ADD  ANOTHER  RESOURCE  TO  THIS  REPORT  (Y/N)";A$ 

8120  IF  A$  =  "y"  OR  A$  =  "Y"  THEN  CLS  :  GOTO  8200 

8130  IF  A$  =  "n"  OR  A$  =  "N"  THEN  GOTO  2200 

8140  COLOR  12:  PRINT  "ANSWER  Y  FOR  YES  OR  N  FOR  N0":C0L0R  7  GOTO  11100 

8200  PRINT: INPUT  "IS  THE  ADDITIONAL  RESOURCE  FROM  THIS  PROJECT  (Y/N)";A$ 

8210  IF  A$  =  "y"  OR  A$  =  "Y"  THEN  CLS  :  GOTO  6100 

8220  IF  A$  =  "n"  OR  A$  =  "N"  THEN  GOTO  2200 

8230  COLOR  12:  PRINT  "ANSWER  Y  FOR  YES  OR  N  FOR  N0":C0L0R  7  GOTO  11100 

8240  GOTO  1800 

8300  Ji£ji[*  *********************************************************************  * 

8400  REM*****SUBROUTINE  TO  CONVERT  JULEAN  DATE  TO  LINEAR  DUMBER  FOR  THE  DECADE 
8500  H£i/i*  *********************************************************************  * 

8600  YR   =  INT(SJDATE/1000) 

8700  IF  YR  >=  0  AND  ((SJDATE  /  1000)  -  YR ) *  1000  >  59  THEN  LY  =  1 

8800  IF  YR  >=  4  AND  ((SJDATE  /  1000)  -  YR)*  1000  >  59  THEN  LY  =  2 

8900  IF  YR  >=  8  AND  ((SJDATE  /  1000)  -  YR ) *  1000  >  59  THEN  LY  =  3 

9000  START  =  I  NT ( S JDATE/ 1 000 ) *365  +LY+  (( SJDATE/ 1 000 )  -  INT ( SJDATE/ 1 000 ))* 1000 

9100  PRINT  YR. (SJDATE/1000-YR)*1000,LY, SJDATE, START 

9200    RETURN 

9300    i{£}/i*  ********************************************************************  * 

9400  REM*******************************************»SUBROUTINE  TO  PRINT  REPORT 
9500  K^yi********************************************************************** 

9600  PRINT  "RESOURCE  PROJECT  RESOURCE 

9605  PRINT  "  NUMBER  NAME  NAME 

9606  PRINT  " 

9700  FOR  Z  =  1  TO  NUM 

9800  PRINT  TAB(3) ;Z;TAB(13) ;PR0J1$(Z)  ;  TAB ( 28 ); RES$ ( Z ): PRINT 
9900  NEXT  Z 

10000  FAC!  =  TDATERECMAX/5:   FACTOR ! =  50/TDATERECMAX   :   MA ! =  FACTOR! 
10010  PRINT:PRINT  "      DATE      #  REQ'D"; 

10100        PRINT  TAB (24  )  ; "0" ; TAB (33)  ; INT( 1*FAC!  )  ; TAB (43)  ; INT(2*FAC!  )  ; TAB (53)  ; 
INT(3*FAC ! ) ; TAB (63) ; INT(4*FAC! ) ; TAB (73) ; INT (5 •FAC! ) 

10205  PRINT  "    ";  TAB ( 24 )  ; CHR$ ( 1 95 )  ; 

10300  FOR  X  =  1  TO  11 

10400  PRINT  Y$;   :  PRINT  U$ ;   :  NEXT  X 
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N  =  0 

FOR  X  =  DATEMIN  -  EARLYYEAR  TO  DATEMAX  -  EARLYYEAR 

GOSUB  12000 

GOSUB  44050 

PRINT  TAB (3) ; CALDATED ; CALDATEMS ; CALDATEY ; TAB ( 1 7 ) ;TDATEREC(X) ; TAB (24) ; 

FOR  Y  =  1  TO  NUM 

49 

50 

51 

52 

53 

54 

55 

56 

57 
48 

PRINT  STRING$(CINT( INDIVIDREC(X, Y)* (FACTOR! ) ) , ITEM) ; 
NEXT  Y 
N  =  N  +  1 
PRINT  :NEXT  X 

INPUT  "DO  YOU  WANT  TO  QUIT  AND  RETURN  TO  DOS  (Y/N)";A$ 
IF  A$  =  "y"  OR  A$  =  "Y"  THEN  CLS  :  END 
IF  A$  =  "n"  OR  A$  =  "N"  THEN  GOTO  11200 
COLOR  12:  PRINT  "ANSWER  Y  FOR  YES  OR  N  FOR  NO":COLOR 


IF 

Y 

= 

1 

THEN 

ITEM  = 

IF 

Y 

= 

2 

THEN 

ITEM  = 

IF 

Y 

= 

3 

THEN 

ITEM  = 

IF 

Y 

= 

4 

THEN 

ITEM  = 

IF 

Y 

= 

5 

THEN 

ITEM  = 

IF 

Y 

= 

6 

THEN 

ITEM  = 

IF 

Y 

= 

7 

THEN 

ITEM  = 

IF 

Y 

= 

8 

THEN 

ITEM  = 

IF 

Y 

= 

9 

THEN 

ITEM  = 

IF 

Y 

= 

10  THE^ 

I  ITEM  = 

7  GOTO  11100 


RETURN 

REM**************************'"******************************************** 
REM*********************»SUBROUTINE  TO  CONVERT  LINEAR  DAYS  TO  JULEIN  DATES 
REM*******************************  **************************************** 
STARTX  =  DATEMIN  +  N 

366  THEN  JDATE  =  0 


1  AND  STARTX  <= 
367   AND  STARTX 


+  STARTX:  GOTO 


<=  731 


732 

1097 

1462 

1828 

2193 

2558 

2923 

3289 


AND 
AND 
AND 
AND 
AND 
AND 
AND 
AND 


STARTX 
STARTX 


<  = 


<  = 


STARTX  <= 


1096 
1461 
1827 


THEN 
THEN 
THEN 
THEN 


JDATE 
JDATE 
JDATE 
JDATE 


=  1000  + 

=  2000  + 

=  3000  + 

=  4000  + 


STARTX  <=  2192  THEN  JDATE  =  5000  + 


IF  STARTX  >= 

IF  STARTX  >= 

GOTO  12500 

IF  STARTX  >= 

:GOTO  12500 

IF  STARTX  >= 

:GOTO  12500 

IF  STARTX  >= 

:GOT0  12500 

IF  STARTX  >= 

:GOT0  12500 

IF  STARTX  >= 

:GOTO  12500 

IF  STARTX  >= 

:GOTO  12500 

IF  STARTX  >= 

:GOTO  12500 

IF  STARTX  >= 

:GOTO  12500 

RETURN 

REM*********************************************************************** 

REM***************SUBROUTINE  FOR  CONVERTING  JULIAN  DATES  TO  CALANDAR  DATES 

REM*********************************************************************** 

LY  =  0 


STARTX 
STARTX 
STARTX 
STARTX 


<  = 


<  = 


2557 
2922 


THEN 
THEN 


JDATE 
JDATE 


6000 
7000 


STARTX 
STARTX 
STARTX 
STARTX 
STARTX 
STARTX 
STARTX 


12500 

-  366 

-  731 

-  1096 

-  1461 

-  1827 
2192 
2557 


<=  3287  THEN  JDATE  =  8000  +  STARTX  -  2922 
<=  3653  THEN  JDATE  =  9000  +  STARTX  -  3287 
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44200 
44250 
44300 
44350 
44400 


CALDATE1$  =  STR$(JDATE) 

YR  =  VAL(LEFT$(CALDATE1$. 2) 

CALDATEY  =  80  +  YR 

IF  CALDATEY  =  80  OR  CALDATE 


IF  VAL{RIGHT$(CALDATE1$,3 

CALDATED  =  VAL 
IF  VAL(RIGHT$(CALDATE1$  ,  3 

CALDATED  =  VAL 
IF  VAL(RIGHT$(CALDATE1$,3 

CALDATED  =  VAL 
IF  VAL(RIGHT$(CALDATE1$  ,3 

CALDATED  =  VAL 
IF  VAL{RIGHT${CALDATE1$ , 3 

CALDATED  =  VAL 
IF  VAL(RIGHT$(CALDATE1$,3 

CALDATED  =  VAL 
IF  VAL{RIGHT$(CALDATE1$,3 

CALDATED  =  VAL 
IF  VAL(RIGHT$(CALDATE1$ , 3 

CALDATED  =  VAL 
IF  VAL{RIGHT$(CALDATE1$, 3 

CALDATED  =  VAL 
IF  VAL(RIGHT$(CALDATE1$,3 

CALDATED  =  VAL 
IF  VAL(RIGHT$(CALDATE1$,3 

CALDATED  =  VAL 


CALDATEMS  = 
RETURN 


"DEC" 


CAL 


) 

Y  =  8 

<=  3 
IGHT$ 

<=  5 
IGHT$ 

<=  9 
IGHT$ 

<=  1 
IGHT$ 

<=  1 
IGHT$ 

<=  1 
IGHT$ 

<=  2 
IGHT$ 

<=  2 
IGHT$ 

<=  2 
IGHT$ 

<=  3 
IGHT$ 

<=  3 
IGHT$ 
DATED 


4  OR  CALDA 
1  THEN  CAL 
(CALDATE1$ 
9  +  LY  THE 
(CALDATE1$ 
0  +  LY  THE 
(CALDATE1$ 
20  +  LY  TH 
(CALDATEIS 
51  +  LY  TH 
(CALDATE1$ 
81  +  LY  TH 
(CALDATE1$ 
12  +  LY  TH 
(CALDATE1$ 
43  +  LY  TH 
(CALDATEIS 
73  +  LY  TH 
(CALDATEIS 
04  +  LY  TH 
(CALDATE1$ 
34  +  LY. TH 
(CALDATE1$ 
=  VAL(RIG 


TEY  = 
DATEM$ 
.3)) 
N  CALD 
.3))  - 
N  CALD 
.3))  - 
EN  CAL 
.3))  - 
EN  CAL 
.3))  - 
EN  CAL 
.3))  - 
EN  CAL 
.3))  - 
EN  CAL 
.3))  - 
EN  CAL 
.3))  - 
EN  CAL 
.3))  - 
EN  CAL 
.3))  - 
HT$(CA 


88  TH 
=  "J 

ATEM$ 

31 
ATEM$ 

(59 
DATEM 

(90 
DATEM 

(120 
DATEM 

(151 
DATEM 

(181 
DATEM 

(212 
DATEM 

(243 
DATEM 

(273 
DATEM 

(304 
LDATE 


EN  LY  =  1 
AN": 

:GOTO  45000 

=  "FEB": 

:GOTO  45000 

=  "MAR": 
+  LY)  :60T0  45000 
$  =  "APR": 
+  LY)  :GOTO  45000 
$  =  "MAY": 

+  LY) :GOTO  45000 
$  =  "JUN": 

+  LY) :GOTO  45000 
$  =  "JUL": 

+  LY) :GOTO  45000 
$  =  "AUG": 

+  LY)  :GOTO  45000 
$  =  "SEP": 

+  LY) :GOTO  45000 
$  =  "OCT" : 

+  LY) : GOTO  45000 
$  =  "NOV" : 

+  LY) :G0T0  45000 
1$.3) )  -  (334  +  LY) 
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